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ESCOLHA 
O PROGRAMA 



E DEIXE O COMPUTADOR CP 400 COLOR II 

FAZER O RESTO 


Açjora sua única dúvida vai ser qual programa usar. Porque o CP 400 
Color 11 tem inúmeros programas em fitas, cartuchos e disquetes para resol¬ 
ver tudo por você, em casa, nos estudos e no trabalho. E teclado profissional, 
que possibilita maior agilidade e facilidade de operação. 

Conheça e teste o CP 400 Color II. Qualidade CP. Tecnologia Prológica. 

Características Técnicas: • Teclado profissional * Porta de comunicação 
RS-232, para ter acesso a toda a Rede Nacional de Telemática e ligação a im¬ 
pressora serial • Memória total 64K • Saídas para monitor e TV em cores • 
Permite 2 joysticks simultâneos e analógicos. 



tsrasii passa por um grande momento histórico, não só 
econômico ou político, mas, principalmente, de uma nova 
mentalidade social, onde direitos e deveres de todos os 
cidadãos têm de ser respeitados. Entre estes direitos que 
Geração Proiógica não abre mão, está o desenvolvimento 
tecnológico da indústria nacional de informática e o acess< 
às informações da evolução científica a todos os usuários 
computação. 

Por isso, a partir deste número, publicamos artigos que 
demonstram o potencial e a versatilidade do 
microprocessador 6809, que, por sua vez, possibilitam o 
interfaceamento do CP 400 Color através de uma visão 
panorâmica dos Pinos de Controle da CPU. Mais do que 
isso, adequando-nos às exigências do mercado, entramos n 
Geração 16 bits da Proiógica, que permite a mais completa 


Carlos Roberto A. Gauch 
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um programa 
emocionante para o CP 400 Color, onde 
você poderá participar de seu próprio 
campeonato de boliche, Mas, se você é 
roqueiro, não se preocupe: seu compu¬ 
tador fará os logotipos das bandas mais 
importantes do mundo. Para aqueles 
que preferem a matemática, um progra¬ 
ma educativo para resolução de 
triângulos. 
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POKE 


Caros amigos, é com imensa satisfa¬ 
ção que lhes escrevo. Sou assinante da 
Geraçao Prológica e faço um curso dc 
BASIC nível I, no qual utilizamos CPs 
300 e 500. Gostaria dc receber informa¬ 
ções sobre a instrução POKE. Preciso 
de endereços e funções de cada um, pa¬ 
ra elaborar programas com esta instru¬ 
ção. Na GP não tem aparecido este as¬ 
sunto para os CPs acima, apenas para 
o CP 400 Color II. 

Paulo Sérgio Garcia — Presidente 
Prudente — SP 

Caro Paulo, agradecemos os elogios 
e a colaboração. Informamos que esta 
função coloca um conteúdo na memó¬ 
ria, mas para isso há necessidade de dois 
argumentos: o endereço dos bytes na 
forma decimal e um valor entre 0e 255. 

Aqui vão alguns efeitos especiais 
produzidos com o uso da função 
POKE: 

Para desativar o fíreak 
Poke 16396,175 
Pokc 16397,201 
A tivar o Break 
Pokc 16396,201 
Acertar o relógio interno 
Poke 16923-dia; Poke 16924-mês; Po¬ 
ke 16922-ano; Poke 16921-hora; Poke 
16920-minuto; Poke 16919-segundo. 
Ligar o relógio 

Poke 16526,152: Poke 16527,2: = USR(0) 
ou DEFUSRI (0) - 664:x = USR1 (0) 
Desligar o relógio 

Poke 16526,161: Poke ÍÓ527,2:x = USR{Ü) 
ou DEFUSR 1 (0) = 673 ;x = USR 1 (0) 


CP 200S 


Gostaria de saber quais as utilidades 
e equipamentos para a expansão do CP 
200S. 

Carlos A . Degasperi —Rio Claro — SP 

O CP 2Ü0S possui um teclado com 
as funções jã impressas nas próprias te¬ 
clas, facilitando o aprendizado da lin¬ 
guagem BASIC. Ele permite a execução 
de sub-rotinas em linguagem de máqui¬ 
na em seus programas, aumentando a 
velocidade de execução dos mesmos. E 
um micro ideal para quem deseja 


iniciar-se no mundo da informática. 
Apresenta grande utilidade na adminis¬ 
tração de pequenos negócios, na reso¬ 
lução de problemas escolares (através 
dos programas educativos) e tacilita as 
tarefas domésticas. O CP 200S tem 16 
Kbytes de memória RAM e 8 Kbytes de 
ROM. Procure a Assistência Técnica 
Autorizada Prológica. Além de efetuar 
a expansão desejada, ela preserva a ga¬ 
rantia de seu equipamento. Ok? 


CP 500 



Gostaria de receber informações so¬ 
bre o CP 500, mercado de software e co¬ 
mo adquirir os números atrasados da 
Geração Prológica. 

Sandra Bertotto — Dourados — MS 

Cara Sandra, o mercado de software 
para possuidores do CP 500 é muito am¬ 
plo, pois existem programas desenvol¬ 
vidos para qualquer área de aplicação 
que se deseje trabalhar. Ele trabalha 
com o sistema operacional DOS 500, 
possui 48 Kbytes de memória RAM pa¬ 
ra armazenar pogramas, arquivos e buf- 
ferde vídeo. Possui ainda 16 Kbytes de 
memória ROM, na qual contém o in¬ 
terpretador BASIC e um monitor resi¬ 
dente, duas unidades de disco com ca¬ 
pacidade máxima dc até 700 Kbytes si¬ 
multaneamente. Pode-se operar sua tela 
com 32 ou 64colunas por 16 linhas. Tem 
capacidade de trabalhar com todos os 
caracteres do alfabeto, símbolos semi- 
gráficos e caracteres especiais. Usando- 
o com o sistema operacional SO08, vo¬ 
cê terá 64 Kbytes dc memória RAM e 
2 Kbytes de memória ROM. Portanto, 
terá também uma biblioteca maior de 
programas, pois o sistema operacional 
é compatível com CP/M, podendo ro¬ 
dar programas como Calcstar, Dbase 
II, Wordstar, programas aplicativos da 
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CURSOS 

Programação no CP 5Ü0 — A SOS 
Computadores trabalha com três lin¬ 
guagens: Basic, Cobol c Assembler 
e cursos especiais para aplicativos* 
Mais informações, nos seguintes en¬ 
dereços: Av. Pacaembu, 1280 — São 
Paulo — SP — têL: (011) 826-0466; 
ou R. Tomás Carvalhal, 380 — Pa¬ 
raíso — SP — teL: (011) 570-9301. 


Introdução à Microinformáticu — 
Datas: 10 e 11 de abril, 19 e 20 de 
maio, 12 e 13 de junho. Horário: das 
8:30 às 17:30* Mais informações: São 
Paulo Computer Insritutc — Aveni¬ 
da Rebouças, 1669 — CEP 05401 — 
São Paulo — SP — teL: (011) 
883-0355, * 


Proiogica compatíveis com o sistema 
700 e muitos outros. O CP 500 possui 
uma porta RS 232C que o coloca cm 
contato com a Rede Internacional de 
Telemática, além do videotexto, Ciran- 
dão e Aruanda. 

Quanto aos números atrasados da 
Geração Prológica, lamentamos infor¬ 
mar que estão esgotados. Sugerimos en¬ 
trar e m contato com outros lei t ores pa¬ 
ra possíveis trocas, através do Clube 
CP’s. 


Teclado Profissional 


Acabo de ver o lançamento do CP 
400II, com tnn excelente teclado. Seria 
possível sua utilização no antigo modelo 
que possuo? Pretendo ainda adquirir 
unia impressora e gostaria de saber qual 
é a mais adequada. 

PS: Agradeço pelas outras consultas 
feitas e respondidas. Isto mostra a de¬ 
dicação de todos da Geração Prológí- 
ca para o aperfeiçoamento <lo produto 
brasileiro. 

Marco A . de Bona Rossi — Méier 
— Rio de Janeiro — RJ 

Agradecemos os elogios. Realmen¬ 
te o nosso objetivo é aperfeiçoar e va¬ 
lorizar o produto brasileiro. 


Análise de Sistemas — O objetivo 
do curso é formar profissionais pa¬ 
ra exercerem a atividade de Analista 
de Sistemas, com sólida base teórica 
e experiência prática. Data: 12 de 
maio a 29 de agosto e 01 de setem¬ 
bro a 19 de dezembro. Mais informa¬ 
ções: Instituto Compucentcr de In¬ 
formática— Rua Bela Cintra» 746 — 
1P andar — São Paulo — SP — teL; 
(011) 255-209L 

Banco cie Dados— Curso de forma¬ 
ção para analistas e administradores 
de banco de dados. Data: 07 de abril 
a 19 de dezembro. Mais informa¬ 
ções: Instituto Compucentcr de In¬ 
formática — Rua Bela Cintra, 746 — 
\? andar — São Paulo — SP —teL' 
(011) 255-2091* 


Dbase II e III básicos, Framework e 
Programação — Período: abril, 


Marco» você poderá trocar o seu te¬ 
clado por um profissional na Rede de 
Assistência Técnica Prológica. Quan¬ 
to à impressora mais adequada para o 
CP 400 é a P 500 serial. Você poderá 
encontrá-la no mesmo locai onde adq u i- 
riu o seu computador. 


Software para CPs 


Estíve na Feira de Informática 85, 
onde recebi um exemplar da Geração 
Prológica. Gostei muito, poisa revista 
mostrou novas realidades para mim. 
Nela descobri o que cu quero em termos 
de micros e gostaria de saber o seguin¬ 
te: programas do CP 300/500 servem 
para o CP 400 e vice-versa? O progra¬ 
ma de Localização e Edição Automáti¬ 
ca de Erro para o CP 400 Color serve 
para os demais? 

José A , V. Découí — Ubata ha—-SP 

Agradecemos suas palavras, pois 
vão ao encontro de nossos objetivos: 
dar suporte técnico a quem deseja en¬ 
trar no mundo da informática. Por ou¬ 
tro lado, informamos que programas 
do CP 300/500 não servem para o CP 
400, e o de Localização e Edição Auto¬ 
mática de Erro, desenvolvido para o CP 
400, não se adequa aos demais. 


maio e junho. Os cursos têm dura¬ 
ção de uma semana com aulas das 
8:30 às 18:00, ministradas no Cen¬ 
tro de Treinamento Datalógica — 
Avenida Paulista, 2028 — 3? andar 
— São Paulo — SP. Mais Informa¬ 
ções pelo teL: (011) 283-0355. Os in¬ 
teressados do interior de São Paulo 
ou de outros Estados podem utilizar 
o telefone 800-159Q» que a ligação é 
por conta da Datalógica. 


EVENTOS 

I 1'ENASI 86 — Feira Nacional de 
Acessório, Suprimentos e Instala¬ 
ções para Informática. De 24 a 27 de 
abril, das 14:00 às 22:00. Palácio das 
Convenções, — Parque Ânhembí — 
São Paulo — SP. 


CP 40Q 



Antes dc tudo quero agradecer pela 
informação técnica sobre o programa 
íl CÁD M . Está funcionando beleza! 

Percebi que o CP 400 não imprime 
nu tela toda; resolvi então comprar uma 
televisão menor e o problema continua. 
Será um defeito? Como preenchera te¬ 
la toda? 

Plínio P. Pochini 
São Caetano do Sul ~ SP 

O fato de seu computador não im¬ 
primir na tela toda é normal, pois ne¬ 
nhum o faz. Entretanto, no caso do CP 
400, isto fica mais evidente pelo fundo 
verde de sua tela. Ok? 
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GERAÇÃO 

A TENDÊNCIA 


N em bem estamos nos re¬ 
fazendo da revolução 
causada pelos micro¬ 
computadores à socie¬ 
dade atual, e jã nos de¬ 
paramos com novidades tecnológicas de 
tamanho vulto que temos de enfrentar 
novamente grandes reflexos sociais e or¬ 
ganizacionais. 

Com a utilização dos microcompu¬ 
tadores, mesmo com a sua capacidade 
de processamento e armazenamento de 
dados límítada, operou-se uma verda¬ 
deira democratização da informática. 
Mui tas empresas, seja pelo seu porte re¬ 
duzido ou pelo baixo grau de sofistica¬ 
ção técnica das suas atividades, nunca 
imaginaram que um dia poderiam se fa¬ 
zer valer de tais recursos computacio¬ 
nais, Principalmente se considerarmos 
que os computadores de grande porte, 
e mesmo os minicomputadores, com 
freqüência necessit am de instalações es¬ 
peciais e pessoal altamente especia¬ 
lizado. 

Hoje, pequenas e médias empresas 
e profissionais liberais utilizam plena- 
mente o microcomputador como ferra¬ 
menta de trabalho. As aplicações são as 
mais amplas possíveis, informatizando- 
se desde as tarefas administrativas e de 
controles tradicionais (contabilidade, 
controle de estoques, faturamento, con¬ 
tas a pagar e receber, folha de pagamen¬ 
to, planejamento e controle da produ¬ 
ção etc,) até as tarefas voltadas para o 
suporte às atividades de advogados, 
dentistas, médicos, arquitetos, enge¬ 
nheiros, economistas e muitos outros. 
Apesar de todas essas aplicações e de 
não necessitar de instalações especiais, 
o microcomputador ainda é considera¬ 
do um mito e se supõe que, para operá- 
lo, é preciso um certo grau de especiali¬ 
zação técnica. Por este motivo, 
vulgarizam-se os cursHs de operação e 
programação para micros. Logo mais 


teremos em cada esquina uma placa 
com os dizeres: M Ensina-se Basic”, 
Esses problemas foram causados em 
grande parte pelas próprias limitações 
dos micros profissionais originais. Es¬ 
ses computadores, que utilizavam ba¬ 
sicamente os microcomputadores 8080 
da Intel e o Z80 da Zilog, tecnologia de 
8 bits, estavam restritos a 64 kB de me¬ 
mória para os programas dc aplicação 
e a 4 MHz de velocidade dc execução 
de instruções. Além disso, do lado do 
armazenamento de dados, basicamen¬ 
te se dispunha de disquetes com não 
mais do que 1 MB de capacidade, 

É fácil imaginar como seria a execu¬ 
ção dc um programa integrado de ges¬ 
tão administrativo-financeira em um 
desses micros. Em primeiro lugar, o 
operador do equipamento iria passar as 
4Í 52 horas do seu dÍa T 1 trocando disque¬ 
tes de programas e dados. Como se isto 
já não tornasse inviável tal empreendi¬ 
mento, o programador desta aplicação 
teria de fazer mágica para conseguir a 
integração necessária a um sistema deste 
porte com os 64 kB de memória e dis¬ 
quetes de 1 MB existentes. 

Não precisamos ir tão longe: as apli¬ 
cações de processamento de textos, ban¬ 
cos dc dados e planilhas eletrônicas, 
consideradas ferramentas básicas para 
o uso do microcomputador, além de 
não serem integradas entre si, não pos¬ 
sibilitavam a comunicação necessária 
com as aplicações administrativas c de 
controle tradicionais. E, com relação às 
empresas de grande porte, o uso dos mi¬ 
cros somente faz sentido em um am¬ 
biente descentralizado, o que implica 
procedimentos eficientes e eficazes de 
comunicação de dados. Novamente, o 
nível de integração possível com os mi¬ 
cros dc 8 bíts realmente deixa a desejar. 
Por isso, foi preciso ir além, pois as ne¬ 
cessidades do mercado exigiram uma 
nova revolução: a geração 16 bits. 



iííiíiííiüuaui 
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16 BITS 

DO MERCADO 



Os micros de 16 bits chegaram ao 
Brasil no final de 1983. Ás principais ca¬ 
racterísticas desses computadores são as 
seguintes: 

— uso do microprocessador Intel 8088 
ou equivalente; 

— aumento da memória de 64 kB pa¬ 
ra 640 kB, ou seja, 10 vezes mais me¬ 
mória para os programas de aplicação 
do usuário; 

— acréscimo na velocidade de proces¬ 
samento de 4 para 4,77 ou ainda 
8 MHz; 

— disponibilidade de gráficos colori¬ 
dos, permitindo uma melhor apresen¬ 
tação e visualização dos dados no 
micro; 

— grande capacidade de comunicação 
com outros computadores (grande por¬ 
te, minis e micros); 

— capacidade de interligação em redes 
de micros; 

— possibilidade de uso em automação 
industrial (controle de processos, aqui¬ 
sição de dados etc,); 

— aumento da memória de armazena¬ 
mento de dados para 10 MB, 20 MB ou 
mais (com o uso de discos rígidos tec¬ 
nologia Winchester); 

— uso de um sistema operacional (pa¬ 
ra o controle das tarefas executadas pelo 
micro) mais sofisticado, facilitando a 
utilização do micro e aumentando a se¬ 
gurança e controle dos dados; 

— possibilidade de aumento da capa¬ 
cidade do micro com o uso de placas de 
expansão (memória adicional, acrésci¬ 
mo das capacidades de comunicação, 
melhor resolução gráfica, interface para 
controle de processos etc.). 

Todas essas características, por si só, 
nada representam, O que real mente im¬ 
porta é o que podemos fazer eom o mi¬ 
cro c o que é preciso para taL À grande 
vantagem dos micros de 16 bits sobre 
os de 8 bits, além, é claro, da alta capa¬ 
cidade de expansão, é a possibilidade de 


desenvolvimento de aplicações inte¬ 
gradas. 

Foi com os micros de 16 bits que sur¬ 
giram programas do tipo Lotus 1 - 2 - 
3, Symphony , Framework , Open Ac¬ 
cess e outros que, utilizando principal- 
mente a maior capacidade de memória 
do micro, a maior velocidade de proces¬ 
samento e as suas capacidades gráficas, 
conseguiram um grau de integração de 
aplicações e facilidade de operação até 
então inimagináveis, a ponto de o uso 
do microcomputador por pessoas sem 
qualquer especialização na área se tor¬ 
nar uma realidade. 


SP- 16 : 


A Prológica lançou o seu micro de 
16 bits, o SP 16, na Feira de Informáti¬ 
ca da Sucesii de novem bro de 1984. Por 
razões de mercado, optou-se pela com¬ 
patibilidade com a linha IBM-PCecom 
o sistema operacional MS-DOS. 

Entretanto, dada a grande importân¬ 
cia, a nível de Brasil, dos micros de 8 bits 
e sistemas operacionais compatíveis 
como CP/M, a Prológica também co¬ 
locou à disposição dos seus usuários 
uma placa de expansão para possibili¬ 
tar o uso, no novo micro, de todo o soft¬ 
ware CP/M até então desenvolvido. 

A preocupação da Prológica em ofe¬ 
recer a disponibilidade de uso de soft¬ 
ware CP/M neste micro como uma ex¬ 
pansão, c não como uma característica 
padrão do equipamento, deve-se ao fa¬ 
to de que os usuários que não necessi¬ 
tam dc software CP/M não devem pa¬ 
gar por isso. 


Cláudio Ágostini 
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O micro de 16 bits da Prológica 


O SP16 é compatível com o IBM versão 2.2, que também rodam no buídas, permitindo um máximo de ra- 

PC* e IBM PC xt *; possui concepção SP 16, com a adição de uma placa. pideze um mínimo de erro na digitação, 

modular, permitindo total adequação Mas não é só na compatibilidade que Além disso, esse teclado é capaciti- 

às suas necessidades. o SP16 ganha dos outros. Sua memó- vo: ele dura 5 vezes mais que os tecla- 

Utiliza o Sistema Operacional SO16 ria chega até 640 kB. Assim, você vai dos comuns, e ao mesmo tempo tem um 

e é compatível com o MS-DOS versão sempre ter a memória mais adequada perfil mais baixo e ergonométrico. 

2.11, Você pode rodar o que há de mais para as suas necessidades, otimizando 

atual e poderoso no mercado de aplica- o seu investimento. ^ 

tivos: l-2-3 tm e o Symphony lm da Lo- O controlador de vídeo tem capaci- TELEPROCESSAMENTO 

tus, o DBase III e o Frame Work da dade gráfica e de cores. No modo mé- - 

Ashton Tate, o Multiplan da Microsoft dia resolução, isso significa 64 mil pon- Com o SP 16 poderão ser utilizadas 

e assim por diante. Não é à toa que o tos em 40 colunas por 25 linhas mos- interfaces e placas de expansão que pos- 

SP16 se chama Sistema Profissional 16. trando até 4 cores simultâneas. sibilitam, além do aumento de sua ca- 

No ato de ligar o SP16, uma rotina O SP 16 pode ter conectadas até duas pacidade de processamento, incremen- 

de Autoteste checa toda a máquina, unidades de disco flexível, face dupla, tar os recursos de comunicação de da- 

apontando imediatamente a causa e lo- densidade dupla. Mas pode também ter dos entre o SP 16 e outros sistemas, 

calização de qualquer irregularidade. conectadas unidades de disco Winches- A comunicação através de cabo coa- 

ter, com capacidade de 5,10 ou 15 Me- xial, emulando terminais IBM 3278/79 
gabytes. conectados a concentradores locais e re- 

COMPATIBILIDADE Aceita impressoras seriais ou para- motos, torna-se realidade com a simples 

- leias, possui portas seriais assíncronas, colocação de uma placa. 

Tudo roda no SP 16, sem problemas, padrão RS 232C e é comandado pelo te- É possível também conectá-lo a um 

Sem contar a grande quantidade de ciado de melhor desempenho do mainframe, remotamente, através de 
software já desenvolvida para o Siste- mercado. protocolo de comunicação do tipo 

ma 700, Super 700 e aplicativos CP/M São 103 teclas racionalmente distri- BSC3. 
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E fmalmente, utilizando-se protoco¬ 
los assíncronos (KERMIT, por exem¬ 
plo), o SP 16 conecta-se à maioria dos 
equipamentos de médio e grande porte 
disponíveis no mercado. 

Isso tudo sem levarmos em conta a 
possibilidade de participar das redes de 
serviços, tais como Cirandão, Renpac, 
Videotexto etc. 

HARDWARE 
Gabinete principal 

• contém todas as placas e até 2 unida¬ 
de disco flexível 5 1/4" 

• até uma unidade Winchester 

• conexões com o meio externo 

• 1 alto-falante de 2" 

Vídeo 

• 12" monocromático (fósforo verde) 

• controle de intensidade luminosa 

• ajuste de inclinação 

Teclado 

• tecnologia capacitiva de grande dura¬ 
bilidade, perfil baixo e ergonométrico 

• composto de 103 teclas: 54 alfanumé¬ 
ricas, 16do teclado reduzido, ^pro¬ 
gramáveis, 16 especiais e 5 para con¬ 
trole do cursor 

Fonte de alimentação 

• 110 ou 220 VAC, 60 Hz 

• proteção contra: curto-circuito, so- 
bretensão e sobrecorrente 

• consumo: 400 VA 

Placas 

As placas que constituem o sistema são: 

a) Placa Mãe 

composta por 8 “slots” padrão IBM 
PC** 

b) Placa CPU (Básico) 

• microprocessador Intel 8088 - 
4,77 MHz 

• co-processador aritmético Intel 
8087 (opcional) 

• 16 kB de memória EPROM (roti¬ 
nas de controle de 1/0 e testes) 

• DMA 

• timer programável: geração de 
tons, geração de base de tempo 
(relógio) 

• 8 níveis de interrupção vetorizada 

• interface e conexão ao teclado (co¬ 
nector padrão DIN) 

c) Placa Memória (Básico) 

• 320 kB de memória RAM (com pa¬ 
ridade), com pastilhas de (64K x 1) 
bits 

• 1 interface paralela (DB 25 fêmea) 

d) Placa de Expansão de Memória (Op¬ 
cional) 

• 320 kB de memória RAM (com 
paridade), com pastilhas de 
(64Kx 1) bits 
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• 1 interface paralela (DB 25 fêmea) 

e) Placa Controladora de Disco Flexí¬ 
vel (Básico) 

• até 2 unidades internas de disco fle¬ 
xível 5 1/4" FD/DD 

• controlador com capacidade de ge¬ 
renciar até 4 unidades 

• capacidade de armazenamento por 
disquete face dupla 48 TPI: 
360 KBytes 

• 2 interfaces seriais assíncronas, pa¬ 
drão RS 232C (DB 25 macho) 

0 Placa Controladora de Vídeo 

(Básico) 

• controlador de vídeo com capaci¬ 
dade gráfica e cores (16 opções de 
cor) 

• 32 kB de memória RAM 

• saída RGBI 

• modo-texto e modo-gráfico 

• 256 caracteres de modo-texto 

• 128 caracteres programáveis no 
modo-gráfico 

• B & P no modo-texto com 40/80 
colunas por 25 linhas 

• B & P no modo-gráfico média re¬ 
solução com 40 colunas por 25 li¬ 
nhas, contendo 64 mil pontos 
(320 x 200). 

• B & P no modo gráfico alta reso¬ 
lução com 80 colunas por 25 li¬ 
nhas, contendo 128 mil pontos 
(640 x 200) 

• colorido no modo-texto com 40/80 
colunas por 25 linhas, 8 cores em 
alta ou baixa intensidade, piscan- 
tes ou não, definidas para o fundo 
e para o caractere (com monitor 
colorido) 

• colorido no modo-gráfico média 
resolução, com 40 colunas por 25 
linhas, contendo 64 mil pontos 
(320 x 200) 


• até 2 unidades (de até 8 cabeças e 
1024 cilindros) 

• gerador de ECC (Error Correcting 
Code) 

• unidades Winchester de 5,10 ou 15 
MB 

h) Placa CP/M (Opcional) 

• permite utilização dos softwares 
escritos para os S600, S700 e 
SS700(*) 

• microprocessador Zilog Z80 
B-4,77 MHz 

• 64 KBytes de memória RAM 

• transforma placa-memória em 
“RAM-DISK” 

AUTOTESTES 

• cada vez que o sistema é “iniciali- 
zado”, o funcionamento de todas 
as placas é avaliado por uma roti¬ 
na de teste, havendo indicação no 
caso de falha 

SOFTWARE 

a) Sistemas Operacionais 

• SOI6, compatível com MS-DOS 
(versão 2.11) 

• SO08, compatível com CP/M (ver¬ 
são 2.2) 

b) Linguagem 

• Basic interpretado, com recursos 
gráficos, sonoros e cores 

c) Software Aplicativo 

• biblioteca de software disponível, 
compatível com S600, S700 e 
SS700(*) 

• software compatível com IBM 
PC** e IBM PC XI ** 

TELEPROCESSAMENTO 

Possibilidade de Comunicação: 

• BSC3 

• cabo coaxial 

• comunicação assíncrona 


• atributos de caractere: reverso, pis- 
cante e alta intensidade 

• campo com matriz de 8 x 8 pontos 
g) Placa Controladora de Winchester 

(Opcional) 


(*) Exceto recursos especiais do SS700 
(vídeo, caracteres programáveis e pla¬ 
cas de expansão). 

(**) Marca registrada IBM. 
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o pioneirismo 
do CLIP INFORMÁTICA 


Zzzzuuuummmm. Isto não é um 
mosquito, muito menos um pernilon¬ 
go, É a transmissão de um software ra¬ 
diofônico, Ou melhor» um elip que 
transmite software por ondas de rádio. 
Espantado?! Mas é isso mesmo!! A 
Radio USP-FM — 93,7 MHz — está le¬ 
vando ao ar, todos os domingos, a par- 
iir das quinze horas, um programa de 
trinta minutos de duração. E o CLIP 
INFORMÁTICA, produzido para os 
apaixonados por micros e interessados 
pela informática em geral. Ele informa 
tudo o que ocorre no mundo dos soft¬ 
wares, desde a produção industrial até 
o comércio ulíra-segmentado. 


O programa está 1 ‘fazendo a cabe- 
ça ,í dos micromaníacosea dos simples 
usuários de microcomputadores e ví¬ 
deos, com prestação de serviços, dicas 
de como comprar ou alugar, tabelas de 
preços, pontos de vendas, testes de equi¬ 
pamentos, novos lançamentos, entre¬ 
vistas com pessoas ligadas ao setor e 
muita musica eletrônica, 

CLIP INFORMÁTICA é produzido 
por uma equipe de profisstonais e estu¬ 
dantes de jornalismo e informática, que 
estão em contato direto com fabrican 
tes, lojas e literatura especializada, pa¬ 
ra manter o nível de atualização. A di¬ 
reção é de Alexandre Fejes Neto, 29 


anos, ex-gerente administrativo de uma 
indústria de equipamentos eletrônicos 
— que deixou a estabilidade do empre¬ 
go para se lançar nessa aventura com¬ 
putadorizada. Alexandre se considera 
“enfeitiçado** por computadores des¬ 
de 1980, porém somente agora está pon¬ 
do em prática essa velha paixão. 

O sucesso desse programa deitou 
Alexandre à vontade para propor ao di¬ 
retor da Rádio, Luiz Fernando Santo- 
ro» novas experiência do gênero, como 
um musical utilizando somente grava¬ 
ções de discos digitais, com a transmis¬ 
são de sinal puro, sem nenhum “chia¬ 
do** ou interferência. 
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bre o reservado mercado da informáti¬ 
ca”, conclui ele. 

Para gravar o software radiofônico 
é necessário dispor de uma fita cassete, 
um gravador comum e seguir as instru¬ 
ções do locutor. No início, ouve-se ape¬ 
nas um “chiado” como se a emissora 
estivesse fora do ar. Mas não está, são 
os sinais que estão saindo da antena da 
USP, diretamente para o gravador do 
ouvinte. Proníinho, sua biblioteca aca¬ 
ba de ganhar de presente um software 
original. 

Entretanto, Alexandre diz que o ou¬ 
vi me acaba gravando o programa intei¬ 
ro, devido às informações transmitidas. 
O sucesso do CLIP INFORMÁTICA 
é tão grande, segundo Alexandre, que 
a Rádio USP vem mantendo negocia¬ 
ções com emissoras de outras cidades vi¬ 
sando a veiculação do programa. 

Os ouvintes do CLIP INFORMÁTI¬ 
CA concorrem a sorteios de publicações 
especializadas, tabelas de mnemónicos, 
descontos cm livrarias, filiação gratui¬ 
ta em clubes de vídeos, entre outros 
prêmios. 

Perseguindo o objetivo de democra¬ 
tizar a informática, Alexandre aceita su¬ 
gestão para pautar edições futuras; to¬ 
dos podem participar divulgando seus 
programas. Maiores informações po¬ 
dem ser obt idas pelo telefone (011) 831 - 
6080, ou escrevendo para: Rádio USP 
— CLIP INFORMÁTICA — Caixa 
Postal 8191 — São Paulo. 


SORTEIO GERAÇÃO PROLÓGICA 


Geração Prológica também está participando do CLIP INFORMÁTI¬ 
CA, através de intercâmbio de informações. Por tratar-se dc um projeto 
original de prestação de serviços aos usuários de microcomputadores, a 
revista autorizou a transmissão de matérias e programas publicados; além 
disso patrocina sorteio, entre os ouvintes do CLIP, de dez assinaturas 
da Geração Prológica, cinco da Nova Eletrônica e mais cinco livros In¬ 
do Além com o CP 400, de Paulo Addair. 

Participe e boa sorte!!! 


Alexandre Fejes Neto, produtor doCLíP 


SOFTWARE RADIOFÔNICO 


A idéia, conta ele, surgiu em 84: 4 * Ao 
ler uma reportagem sobre testes para a 
transmissão de software radiofônico 
nos Estados Unidos, resolvi trabalhar 
em algo que me satisfizesse plenamen¬ 
te”, E completa: 4 'Gravei uma fita e a 
mostrei na USP, porém não acredita¬ 
ram na viabilidade da transmissão; mes¬ 
mo assim, gravamos e fizemos testes em 
vários pontos da cidade; todos deram 
bons resultados e ganhei o programa”. 

O espaço de meia hora reservado ao 
clip é dividido em três partes: a primei¬ 
ra aborda os microcomputadores, 
orientando os usuários quanto à melhor 
maneira de utilizá-los. Na parte inter¬ 
mediária, o assunto em pauta são os vi- 
deogames, videocassetes e discos digi¬ 
tais. Porém, a grande atração está re¬ 
servada aos minutos finais do clip: a 
transmissão de um software, via ondas 
magnéticas, para ser gravado e utiliza¬ 
do pelo ouvinte. 

"Não há roubo, nem pirataria. A 
transmissão é feita após a autorização 
dos criadores, pessoas que atuam na 
área e gostariam de passar os progra¬ 
mas para outros ouvintes”, enfatiza o 
produtor. Já foi transmitido aos ouvin¬ 
tes o Compilador Assernbler que trans¬ 
forma a linguagem BASIC em lingua¬ 
gem de máquina, bem mais veloz na lei¬ 
tura, com grande aceitação. Os jogos 
transmitidos por sinais radiofônicos, 
entre outros, foram Nautilus, Caleidos¬ 
cópio, Xadrez, Labirinto Tridimensio¬ 
nal, programas de controle bancário e 
orçamento doméstico, atendendo usuá¬ 
rios de todas as linhas. 


DEMOCRATIZAÇÃO DA 
INFORMÁTICA 


"Prestar serviços aos ouvintes e de¬ 
mocratizar a informática é o nosso ob¬ 
jetivo. O público amadureceu muito. 
Hoje eie não está preocupado somente 
em saber sobre assuntos técnicos ou pe¬ 
dagógicos. Está preocupado em formar 
opinião para as várias opções de que o 
mercado dispõe”, afirma Alexandre. 
"E o CLIP INFORMÁTICA está 
orientando, educando e informando so- 


INFORMAIICA. 
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Muitas vezes é conveniente ter um método para efetuar 
o retorno ao comando imeditameme anterior a uma parti¬ 
da a quente (warm start) ter sido executada, Para tanto, cria¬ 
remos um novo método com a utilização de um builÉ-in co¬ 
ma ruí (criador de comandos). Digite: 


A >STAT 

A:R/W, ESPAÇO: 302K 
A>SAVE 0 ULTIMO,GOM 


A instrução acima grava no disquete um novo coman¬ 
do, Porém, como o tamanho do arquivo é especificado ze¬ 
ro, não há dados gravados/salvos. Então, se você executar 
o comando ST AT, novameme irá verificar que zero byte 
fot utilizado — o que significa que o comando ULTIMO 
é um programa vazio, 

Quando executamos o comando ULTIMO, o CP/M car¬ 
rega o programa correspondente ULTiMO.COM no início 
daTPA {TransientProgram Âreá), na posição 100 hex. No 



entanto, como não há dados, ele simplesmente reinicia o pro- 
grama que anteriormente ocupava a TPÀ. Para vermos co¬ 
mo esse comando funciona, digite: 


A> PIP 


O CP/M irá carregá-lo na área da memória a partir do 
endereço 100 hex, sendo que o PIP corresponde ao asteris¬ 
co. Normalmente, o PIP é utilizado depois dos parâmetros, 
mas, desta vez, basta teclar ENTER e retornar ao CP/M. 
O CP/M executa um wartn síart e coloca na tela um A> . 
Então, digite: 


A > ULTIMO 


ALERTA! 


FALTA SISTEMA 
NO SEU COMPUTADOR 

Você adquiriu seu micro sem as- 
sessoria especializada e está 
com ele parado e os velhos pro¬ 
blemas que pretendia resolver 
permanecem. 

VALORIZE SEU 
INVESTIMENTO 

Chame os analistas de SISTE¬ 
MAS (software, programas) da 
DIALÓGICA. Transforme em 
prática, a baixo custo, todas as 
idéias e usos que você Imagina 
para seu equipamento. 

CONSULTE-NOS 
SEM COMPROMISSO 

J dialógica 

M ComuntciçAo b Sistemas Ltds, 

Rua Fradique Coutinho, 50 
Pinheiros - São Paulo 

64*7131 ■ 64-0331 


Caso você não esteja convencido, digite um pequeno pro¬ 
grama em Basic: 


10 FOR 1 = 1 TO 10 

20 PRINT "TESTE DO COMANDO ULTIMO” 
30 NEXT 1 
40 END 1 


Execute o programa, mas antes de salvá-lo force uma par¬ 
tida a quente, digitando Control C. Digite agora o comando 
ULTIMO; você notará que o sistema retornará ao BASIC 1 
e que seu programa ainda permanece na memória para ser 
sai vo ou executado. 


DIVISÃO DA MEMÓRIA PARA O SISTEMA 
OPERACIONAL CP/M 

BIOS 

Alta Memória (FF hex) 

BDOS 

CCP 

TPA 

100 hex 

Parâmetros 

do Sistema 

Baixa Memória 
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A EVOLUÇÃO EM Sãgj 

MICROPROCESSADORES 


O 6809 é um dos melhores e mais ver¬ 
sáteis microprocessadores de primeira 
geração, embora alguns o considerem 
pelos seus recursos, dentro da família 
de CPUs da Motorola, como de segun¬ 
da geração, Seu conjunto de instruções 
contém refinamentos que lhe permitem 
concorrer de perto com os primeiros mi¬ 
croprocessadores de 16 bits, além de 
possuir circuitos integrados dedicados 
voltados à implementação de sistemas 
e computadores pessoais. 

O nosso Ímuito, entretanto, neste e 
nos artigos subsequentes, não será 
aprofundarmos tecnicamente sobre es¬ 
ta CPU, nem a nível de hardware, nem 
a nível de software (linguagens de má¬ 
quina), mas sim estudar as suas possi¬ 
bilidades de interfaceamento através de 
uma visão panorâmica dos pinos de 
controle da CPU e da sua filosofia es- 


trut ural, a fim de atingir com exemplos 
práticos um bom conhecimento de suas 
potencialidades, 

Como instrumento de estudo iremos 
utilizar o microcomputador CP 400 Co¬ 
lor, pois com ele teremos fácil acesso a 
quase todos os pinos da CPU, além de 
contar com o apoio de um hardware po¬ 
deroso com Interpretador Basic, que 
nos permitirá acessar externamente pe¬ 
riféricos, sem a necessidade dc conhe¬ 
cermos a linguagem de máquina do 
6809. 

Este trabalho será composto basica¬ 
mente de três artigos. O primeiro terá 
por finalidade a introdução teórica bá¬ 
sica, iniciando com um breve histórico 
sobre o surgimento e a evolução dos mi¬ 
croprocessadores, seguido de um estu¬ 
do sobre a pinagem e a sinalização de 
controle da CPU 6809, com a intenção 


de possibilitar o entendimento dos si¬ 
nais presentes no conector de cartuchos 
do CP 400. 

Nos artigos subsequentes serão dis¬ 
cutidas, com exemplos práticos, as pos¬ 
sibilidades de interligação do CP 400 
com o mundo externo, através de pro¬ 
jetos que irão concorrer para que você 
possa descobrir novas formas de explo¬ 
rar os infindáveis recursos deste versá¬ 
til microcomputador. 


Breve histórico sobre os 
microprocessadores 


O advento dos microprocessadores 
representa um grande marco na histó¬ 
ria do processo dc integração em larga 
escala, pois rompeu a dírecionalidade 
da aplicação dos circuitos integrados 
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dedicados* A fim de exemplificar o sen¬ 
tido desta afirmação inicial» considere¬ 
mos um módulo dedicado que realiza 
as funções de um relógío digital. Para 
que possamos colocá-lo em funciona¬ 
mento, somente teremos que conectá- 
lo a uma fonte de alimentação apropria¬ 
da e interligá-lo a urn conjunto de cha¬ 
ves, que irão realizar as funções de ajus¬ 
te, alarme etc,, próprias deste aparelho. 
Entretanto, observe que não será pos¬ 
sível alterar seu funcionamento de ma¬ 
neira que possamos ter não um relógio, 
mas um cronômetro, embora o módu¬ 
lo possua todos os elementos básicos 
para esta nova função* 

Em meados de 1970, a Intel Corpo¬ 
ration fechou um contrato com um fa¬ 
bricante de calculadoras para realizar 
a integração, em uma única past ilha, do 
circuito de um processador de 4 bits. 
Terminado o trabalho, constatou-se 
que o novo componente se mostrava in¬ 
capaz de processar na velocidade do cir¬ 
cuito original devido às imperfeições do 
processo de integração daquela época, 
sendo então rejeitado pelo comprador. 
Assim se apresentava um impasse: ou 
sc colocava o novo componente no mer¬ 
cado de semicondutores, ou se jogava 


todo o projeto na cesta de lixo e não se 
falava mais no assumo, Fdizmente, o 
4004 não foi para o lixo! 

Após o seu surgimento no mercado, 
pequenas e médias empresas consegui¬ 
ram o seu aproveitamento em diferen¬ 
tes áreas, aumentando a sua demanda 
e obrigando a 1 nlel a lançar o seu suces¬ 
sor, o 04040, com melhores recursos. 

Mas, à medida que o mercado se im¬ 
punha» ganhava força; verificava-se 
que o tamanho do caractere (4 bits) era 
insuficiente para processamento de tex¬ 
tos, embora fosse ideal para números, 
c que havia necessidade de aumentar a 
área de memória disponível ao proces¬ 
sador, permitindo a execução dc pro¬ 
gramas mais complexos. 

Assim, novos esforços foram reali¬ 
zados c, em 1972, a Intel lançou no mer¬ 
cado o 08G08 segu ido de perto pelo 8080 
(1973), ambos processadores de 8 bits. 
O primeiro com capacidade de endere¬ 
çamento real de 16K e o segundo com 
64K. Com este desenvolvimento esta¬ 
vam lançadas as bases de um caminho 
sem retorno para a popularização dos 
microprocessadores, obrigando os de¬ 
mais fabricantes a colocar no mercado 
novos produtos. 


Os microprocessad ores t aiunlmente , 

já atingiram um grau de complexidade 
assustador. Circuitos completos de con¬ 
trole, integrados em uma única pastilha, 
são hoje uma realidade. Porém, esta ex¬ 
plosiva evolução está marcada por ge¬ 
rações bem definidas de CPUs (Central 
Processing Unit). A primeira geração 
engloba as máquinas de 4 e 8 bits, dedi¬ 
cadas à execução de funções básicas de 
processamento, como operações lógi¬ 
cas, aritméticas e controle de fluxos de 
dados, sem um comprometimento com 
sistemas operacionais (CPUs, como o 
4004,8008,8080,6502, 6800, dentre ou¬ 
tras, podem ser enquadrados nesta ca¬ 
tegoria). Entretanto, os esforços indi¬ 
viduais dc várias empresas, preocupa¬ 
das em estruturar uma linguagem de 
apoio dc software para estas máquinas, 
forçaram este comprometimento da ar¬ 
quitetura das CPUs para uma maior au¬ 
tonomia do programador. Ainda na 
primeira geração, máquinas como o 
Z-80, o 8085, o 6801 e 6803, vieram com 
seus maiores recursos (maior velocida¬ 
de, macroínstruções, operações de du¬ 
pla precisão etc...) buscar atender me¬ 
lhor o mercado, marcando o despertar 
da segunda geração dos microprocessa- 


AGORA VOCÊ PODE LIGAR 
QUALQUER IMPRESSORA 
PARALELA AO SEU CP-400 



CONVERSOR 

SERIAL/PARALELO 

Agora vocè pode hgar Iodas 
as impressoras paralelas do 
mercado ao seu micro O 
Conversor Se ria l/Pa rateio per¬ 
mite a vocè conectar qualquer 
impressora paralelo (padrào 
cetronics- á saídasertaldo seu 
micro com a vantagem de. 
com um simples Loque, acio' 
nar lambem qualquer periféri¬ 
co senal. sem a necessidade 
de troca de cabos, 

MM 


COMUTADOR SERIAL 

O Comutador Serial e um 

outro aparelho que permite a 
vocè duplicar a saida senai do 
seu micro. Com ele vocè po¬ 
derá conectar dois periféricos 
n saida serial do seu micro, ao 
mesmo tempo. E para utilizá- 
los basta girar o botão, sem 
aquela incomoda operação de 
troca de cabos. 

Usando em conjunto 
e&les equipamentos. vOCô 
pode ligar, por exemplo uma impressora 
paralela, um Modem o qualquer 
outro periférico serial do $un escolha 


Produtos e Projelos Eletrônicos Lida. 
Rua Pedro Teixeira, 13 
04550 - São Paulo - SP. 
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dores, que se firmou com o aparecimen¬ 
to das máquinas de 16 bits de dados e 
capazes de endereçar I Megabyte de me¬ 
mória real, como o 8086, o Z-8G0 e o 
68000, cada qual com o seu respectivo 
sei de instruções — possibilitando a ma- 
nipulação interna de caracteres de 32 
bits (long-word), multiplicação c outros 
refinamentos. 

Hoje, com os microprocessadores de 
32 bits (terceira geração), questiona-se 
a filosofia clássica dc processamento se¬ 
quencial, buscando novas e mais efi¬ 
cientes estruturas de controle. 


O microprocessador 6809 


Agora, iremos descrever o funciona¬ 
mento dos sinais presentes na CPU e 
que são responsáveis pela perfeita inte¬ 
gração entre o processador e os circui¬ 
tos externos (memória, periféricos 
etc,,,). Assim, através da figura 1, po¬ 
demos observar que: 


— Os pinos 8 a 23 providenciam o en¬ 
dereçamento externo de memória e pe¬ 
riféricos. Se você já conhece o Z-80 {ou 
seus similares 8080 c 8085), irá perce¬ 
ber que o 6809 é um dispositivo volta¬ 
do a trabalhar com dados contidos na 
memória, sendo que todo e qualquer 
acesso a periféricos será realizado atra¬ 
vés de operações de movimento de da¬ 
dos entre registrador c memória. Assim, 
não há necessidade de se ler vários re¬ 
gistros internos na CPU, uma vez que 
ela poderá realizar operações direta- 
mente com operandos comidos em um 
dos 64 Kbytes de memória disponível. 
Observe ainda que o sentido das setas 
indica que os sinais de endereçamento 
saem da CPU para os periféricos ou me¬ 
mória externa, sendo, portanto, sinais 
de controle unidirecionaís. 

— Os pinos 24 a 31 correspondem ao 
barramento de dados para comunica¬ 
ção da CPU com dispositivos externos. 
O fluxo dos dados nestas linhas é bidi¬ 
recional e depende do endereço conti¬ 


do na linha de endereços em um dado 
instante, como também dos pinos de 
controle BS, BA e dos sinais de sincro¬ 
nismo Q oul e E OÜÈ . 

— Os pinos de controle BS (Bus Status 

— pino 5) e BA (Bus ÀvuliabJe — pino 
6) providenciam para os circuitos exter¬ 
nos o estado em que se encontra a CPU 
conforme a tabela da figura 2. Assim, 
com BA = BS = 0, a CPU encontra-se 
processando instruções normalmente 
da memória e realizando os demais ci¬ 
clos de leitura e saída em memória ou 
dispositivo de entrada e saída. Com 
BA - 0 e BS = 1, teremos um estado 
do processamento denominado Ciclo 
de Reconhecimento dc Interrupção, no 
qual a CPU interrompeu temporaria¬ 
mente o processamento normal para 
atender uma sub-rotina especial deno¬ 
minada sub-rotina de t ratamento de in¬ 
terrupções. No 6809, as interrupções 
podem ser geradas através de hardware 
ou software e o micro possui sete níveis 
distintos de interrupção: Reset, NMI, 
IRQ, FIRQ, SWÍ 1, SW1 2 e SWI 3. 

Com li A — 1 e BS — 0 (sincronis¬ 
mo), a CPU estará comunicando aos 
dispositivos externos a execução da ins* 
trução SYNC do 6809. Esta instrução 
é bastante utilizada para estabelecer co¬ 
municação entre dispositivos periféri¬ 
cos lentos (disk-drive, impressora, lei¬ 
tora de fita dc papel etc...). Por fim, 
com BA = BS - 1, leremos a confir¬ 
mação do estado de permissão para uso 
dos dispositivos externos à CPU, por 
um outro microprocessador qualquer. 
Esta função é denominada DMA, ou 
Direcí Memory Access, e pode ser com¬ 
preendida como uma retirada da CPU 
6809 do circuito, possibilitando que ou¬ 
tro micro exerça o controle do sistema. 
Este estado é pedido à CPU através da 
linha de controle DMAREQfpino 33), 

— Os pinos de sincronismo E ollt (pino 
34) e Q ÜUl (pino 35) sinalizam o estado, 
do ciclo de máquina para gravação e lei¬ 
tura, conforme mostra a figura 3. As¬ 
sim, no início do ciclo, o micro coloca 
o endereço correspondente do operam- 
do c estabiliza a linha de controle R/W 
{pino 32) em 1, se for um ciclo cie leitu¬ 
ra, ou 0, se for um ciclo de gravação. 
Observe que, para o ciclo de leitura, os 
dados deverão estar disponíveis no fim 
do cicio de máquina para que a CPU 
possa recebê-los. Para o ciclo de grava¬ 
ção, os dados estarão na linha de dados 
até o fim do ciclo, devendo ser captu- 
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Pin N? 

Signa 1 Name 

Descríptíon 

1 

- 12 V 

12 volts U0Ü mA) 

2 

+ 12 V 

+ 12 VQtts (300 mA) 

- 3 

HALT 

Halt Input to the CPU 

# 4 

NMI 

Nonmaskabíe Interrupt to the CPU 

* 5 

RESET 

Main Rcsct and Power-Up Ctear 

Signal to the System 

* 6 

E 

Main CPU Clock (0,89 MHr) 

* 7 

0 

Quadrative Clock Signa! wbich Leads E 

8 

CART 

Interrupt Input for Cartridge Detection 

9 

+ 5 V 

■f 5 votts (300 mA) 

* 10 


Data Bit 0 

* 11 

D] 

Data Bit 1 

* 12 

D* 

Data Bit 2 

* 13 

d 3 

Data Bit 3 

• 14 

d 4 

Data Bit 4 

* 15 

D S 

Data Bit 5 

♦ 16 

D* 

□ata Bit 6 

* 17 

d 7 

Data Bit 7 

* 18 

R/W 

Read/Write Signal 

* 19 

Ag 

Address Bit 0 

* 20 

Aj 

Address Bit 1 

* 21 

a 2 

Address Bit 2 

* 22 

Aj 

Address Bit 3 

* 23 

a 4 

Address Bit 4 

* 24 

A* 

Address Bit 5 

* 25 

A* 

Address Bit 6 

* 26 

*7 

Address Bit 7 

• 27 

A e 

Address Bit 8 

* 28 

A* 

Address Bit 9 

* 29 

Aio 

Address Bit 10 

# 30 

Au 

Address Sit 11 

* 31 

Aj? 

Address Bit 12 

32 

CTS 

Cartrídge Select Signal 

33 

GND 

Signal Grounrj 

34 

GND 

Signal Ground 

35 

SND 

Sound Input 

36 

SCS 

Spare Select Signal 

* 37 

Ais 

Address Bit 13 

* 38 

A 14 

Address Bit 14 

* 39 

A 15 

Address Bit 15 

40 

SLENB 

Input to Disable Device Selection 


TOR 
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raclospelo dispositivo externo neste pe¬ 
ríodo de tempo. 

— Os pinos XTÀL (39) e EXTAL (38) 

são designados para a utilização de um 
cristal de quartzo, que irá determinar o 
tempo de processamento da máquina. 

— A função do pino 36 (MREADY) es¬ 
tá relacionada com a utilização de dis¬ 
positivos externos lentos, masque não 
necessitam da utilização da instrução 
SINCY. É o caso de memórias lentas 
que não conseguem fornecer seus dados 
no tempo normal de acesso da CPU. 
Mas, com um circuito auxiliar, pode¬ 
mos gerar atrasos de até 10 ps para os 
ciclos dc escrita ou gravação (veja a fi¬ 
gura 31. 

— Os pinos 2,3, 4 e 5 são sinais de en¬ 
trada para os comandos de interrupção 
via hardware (NMI, IRQ, FIRQ e 
Rcset). 


— 0 pino 40 (Halt) estabelece (quan¬ 
do em nível 0) uma parada momentâ¬ 
nea do processamento, sendo utilizado 
geralmente para depuração de progra¬ 
mas através de circuitos externos. 

— Os pinos 7 (+ V cc ) c I (CND) pro¬ 
videnciam a alimentação ao micropro¬ 
cessador. 

Observe que para a perfeita com¬ 
preensão destes sinais é necessário al¬ 
gum conhecimento anterior. Todavia, 
se você é leigo no assumo, não se apa¬ 
vore! Estes conceitos, embora lhe pa¬ 
reçam confusos, vão ser repetidos mais 
tarde, qnando desenvolvermos alguns 
circuitos práticos, que poderão ser as¬ 
similados com maior facilidade. 


O conector de cartucho do 
CP 400 Color 


A figura 4 ilustra o conector de car¬ 
tucho do CP 400 juntameme com a des¬ 
crição da pinagem. Observe que os as¬ 
teriscos {*) designam sinais de controle 
provenientes da CPU e já analisados an- 
teriormente. 

Pino I (saída) — Fontedcalimentação 
negativa - 12 V cc para fornecimento 
de até 1,2 W máximo a circuitos ex¬ 
ternos. 

Pino 2 (saída) — Fonte de alimentação 
positiva + 12 V cc para fornecimento 
de até 3,6 W máximos a circuitos ex¬ 
ternos. 


Pino 8 (entrada) Cart — OCP40ÔCo- 
lor se utiliza do comando Cart para de¬ 
tectar a presença do cartucho quando 
o micro é ligado. Para tanto devemos 
interligar esta entrada ao pino 7 do car¬ 
tucho que fornece o sinal Q om prove¬ 
niente da CPU já estudada anterior- 
mente. Isto fará com que o micro exe¬ 
cute um salto para a área dc memória 
de 16 Kbytes externa (aces sível através 
do conector pelo si nai CTS, que será vis¬ 
to mais à frente); rode o programa ai 
disponível. 

Pino 9 (saída) — Fonte de alimentação 
positiva + 5 V cc para fornecimento de 
até 1,5 W máxi mo a circuit os externos. 
Pino 32 (saída) CTS — Sinal utilizado 
para acessar a memória do cartucho. 
Este sinal irá a 0 quando a CPU estiver 
lerid o o u gravando n a área de memória 
entre 49.152 D a 65.519 D. 

Pinos 33 e 34 — Referência de terra pa¬ 
ra um circuito externo. 


Pino 35 (entrada) SND — Esta linha de 
entrada está conectada internamente 
com um gerador dc tom no CP 400 Co¬ 
lor eé utilizada para criar efeitos sono¬ 
ros para anima ção d e jogos etc. 

Pino 36 (saída) SCS — Este si nal r ea- 
liza uma função semelhante ao CTS so¬ 
mente difer encia ndo na faixa de ende¬ 
reçamento (SCS = 0, quando o micro 
está acessando a área de memória que 
vai de 65344D a 65375D) e no t amanho 
da área que para o sinal SCS é de 32 
bytes. 

Pino 40 (entrada) SLENB — Esta en¬ 
trada, quando em 0, permite que um mi¬ 
croprocessador externo manipule os cir¬ 
cuitos internos do CP 400 Color, sen¬ 
do que suas funções são semelhantes à 
entrada DMAREQ da CPU (pino 33), 
vista anteriormente. 


Ciro Peixoto 
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CONSÓRCIOS 
na era 

da informática 


Os administradores de consórcios 
já não precisam se preocupar com 
previsões e análises de grupos 
ou bens para um eficiente 
gerenciamento de sua empresa, 
pois a informática tem a solução 
administrativa para o setor. 


Apesar cio novo plano econômico do 
governo, ainda continua muito difícil 
comprar um automóvel 0 km, quer se¬ 
ja financiado ou (muito menosí) à vis¬ 
ta, pois o poder aquisitivo da grande 
maioria da população brasileira perma¬ 
nece abaixo de suas necessidades reais. 

Devido a essa conjuntura, o consór¬ 
cio se transformou no caminho ideal pa¬ 
ra todos aqueles que sonham com o car¬ 
ro favorito, transformando este setor 
em grande gerador econômico; até o ini¬ 
cio deste ano havia no Brasil cerca de 
500 empresas administradoras de con¬ 
sórcios, sendo que, só em São Paulo, 
existem aproximadamente 200 empre¬ 
sas — envolvendo no total milhões de 
consorciados. 

O volume de negócios, previsões e 
análises que envolve essas administra¬ 
doras é enorme e para que seu gerencia¬ 
mento seja eficiente é necessário agili¬ 
dade em relatórios e comunicação com 
consorciados, para que as assembléias, 
lances e sorteios se transformem em so¬ 
lução, não em problema para a empre¬ 
sa ou consorciado. 

Por acreditar que a informática é a 
base para se conquistar as soluções ad¬ 
ministrativas necessárias ao setor, Jo¬ 
sé Roberto Santana, diretor da Soficar 
S/C Ltda., implantou a informática cm 
sua empresa através de um micro Super 
700, uma impressora P 720 e do Siste¬ 
ma Administrativo para Consórcios, da 
Prológica. 


'Tivemos uma grande surpresa ao 
utilizarmos o Aplicativo Prológica pa¬ 
ra Consórcios: os recursos são muito 
mais poderosos e as possibilidades de 
soluções mais eficientes do que imagi¬ 
návamos. Por exemplo: para realizara 
previsão de arrecadação mensal, ma- 
nualmente, levávamos dois dias. Hoje, 
com a implantação desse sistema, em 
apenas duas horas elaboramos não só 
a previsão, mas todos os controles ad¬ 
ministrativos e financeiros essenciais 
para a administração de nossos 21 gru¬ 
pos de consorciados”, afirma Santana. 

Além da Soficar, o Consórcio Nacio¬ 
nal Massey-Ferguson e a Adetec — Ad¬ 
ministração e Serviços também se utili¬ 
zam dos mesmos equipamentos e do 
mesmo sistema administrativo, que 
apresenta as seguintes soluções: 

1, Possibilita, em apenas duas horas 
após o fechamento do mês, a previsão 
de arrecadação para o próximo mês por 
grupo ou bem, através do Relatório de 
Previsão de Arrecadação. Com ele, a 
empresa tem a previsão exata da arre¬ 
cadação por grupo, bem e geral, desta¬ 
cando os valores no jurídico, em co¬ 
brança e diferenças de parcelas — agi¬ 
lizando recursos e administração para 
o próximo mês. 

2. Permite a agilização do processo 
de cobranças com relatórios que indi¬ 
quem os inadimplentes, logo após o fe¬ 
chamento do mês, com real controle de 
contemplações e débitos. 


3. Possibilita relatórios e histogra¬ 
mas atualizados, contendo a posição ge¬ 
ral de cobranças, lances, sorteios e con¬ 
templações de cada consorciado ou gru¬ 
po, para a realização de assembléias. 

Além de solucionar esses problemas 
essenciais para as empresas, com rela¬ 
tórios de previsão de arrecadação, con¬ 
sorciados em débito, histograma de pa¬ 
gamentos c extratos de conta corrente 
por consorciado, o sistema prevê ain¬ 
da lançamentos extras, como relatórios 
gerenciais (com aposição financeira por 
grupo), relatórios contábeis (diário au¬ 
xiliar de pagamentos), relatórios ope¬ 
racionais (cadastros, tabelas de preços, 
vendas, cobranças etc.) c a comunica¬ 
ção com o consorciado, que emite ma¬ 
la direta (etiquetas e cartas, carnês e de¬ 
monstrativos). Isso tudo, só acionando 
teclas! 



José Roberto Santana, 
diretor da Soficar, 


GÉRAÇAO PROLOGICA 


15 











































Você quer comprar um computador? 

Entre num consórcio... 




O computador detém a segunda co¬ 
locação na lista dos produtos mais ven¬ 
didos, através de consórcios, perdendo 
apenas para o automóvel. Essa infor¬ 
mação foi dada pelo presidente da As¬ 
sociação Brasileira de Administradores 
de Consórcios, Egídío Airton Modolo. 

Segundo ele, existem 19 mil grupos 
de consórcios, no Brasil, reunindo mais 
de 2 milhões de consorciados, que bus¬ 
cam desde máquinas industriais até 
aviões. 



Computador 
controla cavalos 

A Associação Brasileira de Criado¬ 
res de Cavalo Árabe está informatizan¬ 
do suas atividades. O computador con¬ 
trola um arquivo com 2 mil sócios e mais 
de 16 mil cavalos registrados. Além dis¬ 
so, processa todos os dados da associa¬ 
ção, como cadastros, haras, mala dire¬ 
ta* Ainda cuida da documentação téc¬ 
nica, veterinária e supervisão de todos 
os animais. 


Comunidade médica 
exige política de informática 
para o setor 



Informatizar a medicina é a 
ordem da comunidade médica 
brasileira. Segundo ela, épreci- 
so definir uma política para a 
área médica, interligada ao Pla¬ 
no Nacional de Saúde e Infor¬ 
mática. 

Como a área é muito ampla 
e complexa, a aplicação da in¬ 
formática deve ser dividida cm 
vários setores: aplicativos para 
sistemas de suporte administra- 
Livo de hospitais, clínicas e de¬ 
mais instituições; desenvolvi¬ 
mento de softwares para a des- 
burocratizaçao dos serviços 
prestados; sistema de suporte ao 
atendimento de pacientes; siste¬ 
mas de auxílio aos profissionais 
de saúde. 

O objetivo dessa moderni¬ 
zação no setor é a melhoria da 
qualidade dos serviços presta- 
dos. 
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Computador da NASA busca vida inteligente no espaço 


Com um computador acoplado a um 
radiotdescópio, uma equipe formada 
por engenheiros, físicos c astrônomos 
da NASA, Estados Unidos, tema des¬ 
cobrir vida inteligente no espaço pro¬ 
fundo, através de sinais de rádio. 

A equipe busca um tipo de sinal de 
faixa estreita de sintonização, produzi¬ 
do por outra civilização tecnologica¬ 
mente adiantada, um sinal de alta- 
frequência extrema não produzido pe¬ 
la natureza. 



O futuro do jornalismo 



“ A informática 6 o futuro do jorna¬ 
lismo”, afirmou Roberto Civita, dire¬ 
tor superintendente da Editora Abril, 
em palestra realizada em São Paulo. 

Ele acredita que “haverá uma total 


interligação do mundo pela eletrônica, 
além de uma segmentação dos meios de 
comunicação*'. 

O agente dessa revolução, segundo 
Civita, e a informática, que tendera a 


se fundir com a comunicação, para 
atender um mundo que muda muito de¬ 
pressa. 

“Com a informática, é possível o 
acesso a bancos de dados de qualquer 
lugar do mundo* Com isso, teremos in¬ 
formações mais globais, de melhor qua¬ 
lidade, em menos tempo”, diz ele. 

Em termos de comunicação, o tem¬ 
po é um fator fundamental Robertodiz 
“que o repórter fará suas matérias di- 
mamente em seus micros, no local on¬ 
deo fato acontece, seja num estádio ou 
numa reunião política. Com isso, ga¬ 
nharemos mais uma vez em agilidade, 
rapidez e qualidade da notícia”, 

“Quem dispõe de grande capacida¬ 
de de investimentos deve pensar na mí¬ 
dia eletrônica e seus desdobramentos — 
bibliotecas de vídeo, discos a laser, equi¬ 
pamentos de som e suas interligações 
—, pois as máquinas de escrever estão 
a caminho de se transformar em mamu¬ 
tes pré-históricos”, concluí Civka. 


Mais um gol para a informática 



Os grandes astros do futebol mundial vão fazer “pipi” 
para o computador, isso porque os exames antidoping 
da Copa do México, prevista para começar no final de 
maio próximo, serão controlados por computadores. É uma 
inovação, pois eram utilizados meios clínicos menos eficien¬ 
tes. Cada sede tera uma equipe de controle formada por três 
médicos e (quem diria?) um especialista em computação. 


Aceita uma taça de vinho? 



A Europa está usando o computador para analisar vi¬ 
nhos. Ele demonstra com muita exatidão se, no ano in¬ 
dicado pelo rótulo, a colheita de uva foi de boa qualida¬ 
de ou não. Determina se o vinho foi envelhecido o sufi¬ 
ciente e adequadameme na cave. O computador contém 
dados armazenados sobre os melhores vinhos dos últi¬ 
mos vinte anos. Aceita uma taça? 
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nizadores. “Ele é rápido, ágil e ao tér¬ 
mino de cada partida informa ao joga¬ 
dor a sua classificação”, diz Ricardo, 

Á idéia, segundo ele, surgiu de uma 
brincadeira: “Meu tio Carlos Eduardo 
Maia Simões é apaixonado por boliche 
e informática, Ele resolveu desafiar o 
juiz na contagem cie pomos e controlar 
suas atuações, No desenrolar do tor¬ 
neio, verificou-se que todos os partici¬ 
pantes se dirigiam ao CP, e não à mesa 
controladora, para obter infor- 
mações”. 

Trabalhando simultaneamente com 
uma impressora P 500 serial, daProló- 
gica, o Color emite listagens com infor¬ 
mações sobre a atuação de cada joga¬ 
dor na partida, os pinos (pontos) acu¬ 
mulados, o número de jogos disputados 
c a média de acerto nas batidas. Ricar¬ 
do afirma “ser impossível calcular na 
ponta do lápis t a n t as co ruas com p reci - 
são e rapidez”. 


Jandira, campeã individual do femi¬ 
nino diz: “Eu só jogo, a contagem dos 
pontos fica para o CP 400”. Á mesma 
opinião tem Milena, campeã de duplas 
e vice do individual: “Com o computa¬ 
dor a contagem fica mais rápida e é mui¬ 
to confiável”, diz ela. 

Para analisar a classificação média 
por partidas e manter informados todos 
os jogadores, o CP mergulha na memó¬ 
ria e os agrupa em duplas, tercetos ou 
mantém o jogador isolado conforme a 
modalidade da partida, “Ao entrar na 
quadra para a disputa, o jogador jáco- 
nhece a sua atuação anterior e quantos 
pomos deverá t i rar dos outros adversá¬ 
rios, Alem disso, o CP 400 movimenta 
constantemente a relação de pomos e 
mostra no vídeo os dezesseis primeiros 
colocados que vão disputaras finais do 
torneio”, explica Ricardo, 

“O programa foi desenvolvido 
assoei ando-se um número específico 
{ou código) ao nome de cada participan¬ 
te, visando a economia de caracteres do 
computador”, diz ele. “Se usasse o no¬ 
me de todos os inscritos, a memória de 
64K seria insuficiente”, conclui. 


marca pontos 
em torneio 
de boliche 


O CP 400 Color entra em campo e 
marea pontos em torneio de boliche. Es¬ 
sa bela jogada aconteceu no “Torneio 
Internacional Cidade de São Paulo”, 
promovido pela Federação Paulista de 
Boliche e disputado nas quadras do Mo- 
rurnbi Shopping Center, no fina! de ja¬ 
neiro, em São Paulo. Segundo Z, 
Bauer, presidente da entidade, “o de¬ 
sempenho do CP 400 íoi ót imo e por is¬ 
so vamos utilizá-lo também no Cam¬ 
peonato Brasileiro Interclube, progra¬ 
mado para abril, aqui em São Paulo” 

Durante o campeonato, o CP 400 
controlou e analisou centenas de parti¬ 
das disputadas entre 78 jogadores e 24 
jogadoras detodoo Brasil edo exterior, 
jogando em duplas, tercetos e indivi¬ 
dualmente. 

Segundo Ricardo Simões Camara, 
criador do programa e operador do 
equipamento, essa é a segunda vez que 
o CP 400 Color entra no time dos orga- 


18 


GERAÇÃO PROLÓGICA 































• Placa de CP/M 
^^p/SP-16 com 64 kbytes. 
V Transforma restante da me¬ 
mória em RAM DISK . 


Cabos de ligação micro/impressora_ 

* IBM é marca registrada da Interna¬ 
tional Business Machine 


Placa rede de comunicação NCT- 
7301, p/interligar vários SP-16. 

Placa emuladora de termirjal IBM 
3278/3279 NCT-7101 PCOX. 

Placa de comunicação BSC3 NCT- 
7501_ 

Placa emuladora de terminal IBM 
3278/3279 NCT-7201 IRMA. 


Controle de estoque_ 

Contabilidade_ 

Folha de pagamento_ 

Contas a pagar e receber_ 

Cadastro de clientes_ 

Mala direta_ 

DATAFLEX mono e multiusuário 

8 e 16 bits_ 

CONSULTE OUTROS SOFTWARES. 



COMPATÍVEL COM 

.. ^ IBM PC/XT 

(*) 


/ «íyv* r*\?\ \ 

VERSÃO I (preços sob consulta) 

2 drives, slims, FD/DD, 320 kbytes 

VERSÃO II 

1 drive FD/DD, 320 kbytes memória 
RAM e Winchester 5 Mbytes. 

VERSÃO III 

1 drive FD/DD, 320 kbytes memória 
RAM e Winchester de 10 Mbytes. 

VERSÃO IV 

1 drive FD/DD, 320 kbytes memória 
RAM e Winchester de 15 Mbytes. 


• Placa expansão de 320 kbytes, ex¬ 
pandindo até 640 kbytes de memó¬ 
ria RAM p/SP16 . 


B Revendedores autorizados 

FERNANDÔPOLIS — SP 
3-6142 Compshow TeMOl 74)42-1697 
BELO HORIZONTE - MG FORTALEZA - CE 

ComputronixTo1.(031)225-3305 Siscomp Tol.:(085)244-4911 


— Placa BACKUP disco rígido p/video 
cassete NCT-6201 _ 


Direto: (011) 220*5794 

Consertos e contrato de manutenção. 


• CP500 022D-M80, 1 drive FD/DD, 
DOS-500, CP/M 80 colunas. 

• CP500 023D-M80, 2 drives FD/DD, 
DOS-500, CP/M 80 colunas. 

• CP400 color II 64 kbytes. lH 

• CP200S, 16 kbytes.(preços sob consulta) 


Diskettes 5 1/4° caixa com 10 unida¬ 
des FS/DD_ 

FD/DD_ 

Formulário contínuo 1 via: 

80 colunas (milh.)_ 

132 colunas (milh.) _ 

Fitas p/impressora: 

P500_ 

P720_ 

P740_ 

Mesa p/r.nmpntaHnras- 

Estabilizadores de tensão: 

0,8 kVA_ 

1,5 kVA_ 



■ÍLéI^YS • P500S paralela ou serial 150 CPS, 80 

co * unas ' caracteres normais, compri* 

Software video texto p/CP 500_ midos e expandidos ' sráfiçocompatf- 

_ vel com MX-80 , ^ 

Modem EMBRACOM_ #P720 paralela e serial 200 CPS 132 

CP532C (RS232/CP500)_ colunas e compatível com MX-1Q0. 

Serial 300- #P740 paralela e serial 400 CPS, 132 

Joystick CP400_ colunas. 

Monitor colorido p/SP16.$ob consulta OBS.: Impressoras P500 e P720 densi- 
Placa CP/M p/CP500 M.80 com 128 dade gráfica compatível com gráficos 
kbytes RAM _ LOTUS 1, 2, 3, Picture Graphic, etc. 

FILCRES ELETRÔNICA ATACADISTA LTDA. 

Rua Aurora, 165/179 — São Paulo — SP — Estacionamento própriò 
Tels.: Vendas (PBX) 223-7388 - 222-0016 - 223-7234 


Digilógica Tol. 1031)223-4966 

CAMPINAS-SP 


GOIÂNIA - GO 


Soft En Byto Tel. 10192)52-6369 Soft New Tel.(0621224 9322 


CAMPO GRANDE - MS 
New Line Ta1.(0671382-0682 
CATANDUVA - SP 

Catanduva 

Máquinas Tol.(0175)22-6167 
CURITIBA-PR 


GOVERNADOR VALADARES 
MG 

Computron Tol. (0332)21-8412 
NATAL - RN 

Maximicros Tol.(084)222*8918 

POÇOS DE CALDAS - MG 


Tol.(041)232-1750 Micro Poços Tc1.(035)721-1883 


PORTO ALEGRE - RS 
Hercos Tol..(0512)25-4923 

RECIFE-PE 

Croma Tol. (081)325-3493 

RtO DE JANEIRO - RJ 
Sinclair Placa Te 1.(021)549-2699 
Sisteco Toi. (021)220-9613 

SAO BERNARDO DO CAMPO 
SP 

Micro'* ToU0111448-6234/ 

_ 441-2122 

SÂO PAULO - SP 
Benny Microcompu¬ 


tadores Tel. (011)570-1555 
Bomi Microcompu¬ 
tadores Tol. (011)93-1102 
Citty Micros Tels.(OII) 

831-0944/832 9458 
Iguatemicro Tol.:(011 )8l5-9701 
Garra Tel <011)884-3042 

NC Micro Tel.(011)533-4388 

Opus Informá¬ 


tica 

Provac 

Tropical 

Sisoc 

Cistec 


Tel.(011)273*5757 
Tol. (011)274-5861 
Tol. (011)543-9859 
TeMOl 1)283 0853 
ToU011)288-5413 


SOS Tel. (011)826-0456 

SAO VICENTE - SP 
Alto-Reso¬ 
lução ToU0132)67-2496 
TAUBATÉ - SP 
Enstcom Tol. (0122)33-2944 
UMUARAMA - PR 
CBM TeU0446>23-2233 

VITÓRIA - ES 
Casa dos Tele¬ 
fones Tol.1027)222 5011 
Composoft Tol. (027)222-5758 
WR Compu¬ 
tadores To 1.(027)2253144 





CLASSIFICADOS 




Programas com som para o CP 200, TK 85 e compatíveis. 
Os interessados devem escrever para: 

Haroldo Souza Ferreira — Caixa Postal 81.825 — 
CEP: 27500 — Resende — RJ 



Desejo adquirir os números 1 a 9 e 12 da Geração Prológi- 
ca. Porém tenho maior interesse no último. 



Marcelo Franca Alves — Rua Eunice Bechara dc Oliveira, 
726 — V. Fazzioni — CEP: 05884 — São Paulo — SP 


Gostaria de receber informações sobre como participar do 
CLUBE CP*s e quais são suas vantagens. 

Rodolfo Constante Martins — Rua Ceará, 335 — 
Jardim Riviera — 14400 — Franca — SP 

Nota da Redação: Caro Rodolfo, consideramos a informá¬ 
tica um setor essencial para todas as atividades que exijam 
eficiência, rapidez e possibilidades de várias opções de in¬ 
formação para sua execução. Como ferramenta de traba¬ 
lho, lazer e educação» a computação vem demonstrando ser 
a base para um efetivo desenvolvimento social c tecnológi¬ 
co. Por isso, acreditamos que os interessados não só devem 
ter acesso a todas as informações possíveis sobre esta área 
— quer sejam de um veículo de comunicação do setor em¬ 
presarial como do governo — mas, principalmente» criar 
o hábito do intercâmbio dessas informações entre os pró¬ 
prios usuários. O CLUBE CP's tem como principal meta 
alimentar este hábito (democratizar informações) entre to¬ 
dos os interessados em informática, além de publicar maté¬ 
rias, dicas e programas de interesse geral através da Gera¬ 
ção Prológica. Se você gostou, seja bem-vindo. 



Desejo comprar ou trocar os números l, 2, 3, 5 da Geração 
Prológica pelos programas para o CP 300 versão fita cassete. 

Hei der An tonto Simões — Rua Des, Oldemar Pacheco, 
355/201 fundos — CEP: 21231 —- Vista Alegre — RJ 



PROGRAMAS PARA O CP 400 



Quero trocar programas para o CP 400. Os interessados de¬ 
vem enviar correspondência e lista de programas disponí¬ 
veis para a troca. 

Fernando Monteiro Guerrcro — Rua B, 116 — Jardim 
Noronha — CEP: 37550 — Pouso Alegre — MG 
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16Ü0m 2 para lhe proporcionaro meihor atendimento. 


ATENDIMENTO 

PERSONALIZADO: 

Equipes especializadas para 
orientá*fo oudemonslrar 
equipamentos em todo o 
território nacional. 




F1LCRES„ 0 ak>* 


INFORMÁTICA: 

Completa linha de periféricos 
e computadores, desde 
pessoais até Sistemas 
profissionais. 


ASSISTÊNCIA 

TÉCNICA: 

Profissionais altamenle 
qualificados, 
a ptos a atender 
qu aJq u e r tipo de nece s s i dade. 



TREINAMENTO 
E CURSOS; 

Mantemos cursos elreinamento 
de operação gratuitos, 
i nd ui ndo au I as p rátrcas 
e material didático. 




SUPRIMENTOS 

PARACPD: 

DiskeHes, formulários, fitas 
para impressoras etc... 
apronta entrega, 



INSTRUMENTOS: 

Equipamentos de teste e medição 
para as diversas áreas 
da Eletrônica e Informática. 



AJUDANDO A DESENVOLVER TECNOLOGIA 

Rua Aurora, 165 - SP - Tel.: PBX (011 ) 223-7308 - Telex (01 1 ! 31298 Dirvto - SP - 223* 1446/ 
222*3458/220*9113/220-7954 Direto outros Ei tados : 222*5430/221 -0326/223-7649/222-0284 



























CP500/M a grande solução. 

Garantia da maior biblioteca 
de programas aplicativos. 


O CP 50Ü/M eo agora também é compatí¬ 
vel com CP/M t o Sistema Operacional 
mais difundido no mundo. Isso significa 
que, somando o tradicional DOS 500 
com o CP/M, você passa a dispor da maior 
biblioteca dc programas aplicativos do 
mercado. Trata-se da solução inteligente 
e racional para o seu dia-a-dia, permitindo 
a você tirar vantagem de programas como 


Cal cStar*, dBase II 4 , Wordstar* e muitos 
outros, que vão agilizar tanto a sua vida 
quanto a da sua empresa: Folha dc 
Pagamento, Controle âè Estoque, Contas a 
Pagar/Receber, Administração Hospitalar, 
Cálculo Estrutural, Sistema de Balancea¬ 
mento dc Rações c outros programas especí¬ 
ficos para o seu ramo de atividade, 

O CP 500/M? 0 possui saída paralela para 


impressora, e você pode instalar facilmente 
uma porta RS232-C, que o coloca em 
contato com a Rede Internacional de 
Telemática, alem do Videotexto, Cirandào, 
Aruanda etc. Conheça no seu revendedor 
mais próximo o CP 500/M 80 . 

Um grande passo na informática, com a 
qualidade CP e a Tecnologia Pro lógica. 


Características 

Sis tema Operacional 

Video 12 M fósforo verde com controle dc 
imensidade 

Teclado pro fusionai capacUivo com numérico 
reduzido 

Interface parct impressora paralela 
interface serial pad rio KS232-C {opcional ) 

Frequência de Operado: 2 Mlt? 

Unidade dc vom curn controle dc volume 

Opera com 1 ou 2 dnvesde face simples ou dupla 


SD-Oíí 

DOS 500 

Memória RAM 

Memória ROM 
Compatibilidade 

Video 

64 Kbytes 

2 Kbytes 
CP/M* 
SQcotunas por 

24 linhas 

4R Kbytes. 

16 Kbyles 

TRS DOS 
te ou 32 colunas 
pür 16 linhas 



COMPVTADORES PESSOA IS 


TtOtfXOGiA 
PHOLCQCA mmm 

mm 


* 5 Iradas 











































































ESTE SUPLEMENTO É PARTE INTEGRANTE DA REVISTA GERAÇÃO PROLÓGICA N.“ 17. NÀO PODE SER VENDIDO SEPARADAMENTE. 




ÍNDICE 


1. FESTIVAL DE ROCK 

Desenhe com o seu CP 400 Color todos os logotipos dos melhores con¬ 
juntos do mundo...*.*.... ^ 


2. RESOLUÇÃO DE TRIÂNGULOS 

Transforme seu CP 500 (qualquer modelo) em um Albert Einstem. Para 
começar, descubra os ângulos de qualquer triângulo ...-.6 


3, BOLICHE 

Teste sua habilidade fazendo um Strike com seu CP 400 Color.. 8 




















APLICATIVO 


FESTIVAL DE ROCK 


CP 400 COU 


Atenção, roqueiros! Fina Imente o 
que vocês estavam esperando. Através 
do Festival de Rock vocês terão arqui¬ 
vados os logotipos dos melhores con¬ 


juntos do mundo. Entre eles: YES, 
QUIET RIOT, ZZ TOP c outros. 

Para entrar nessa loucura, digite o 
programa e siga as instruções abaixo: 


1 — Digite a instrução RUN, 

2 — Após a construção do palco, di¬ 

gite A ou B (as teclas A e B con¬ 
trolam a variação de cor). 

3 — Digite uma das letras corres¬ 

pondentes aos conjuntos e es¬ 
pere pela surpresa. 


10 '**************************** 
20'* FESTIVRL * 

30 '* DE * 

40 ' * ROCK * 

50 '* ÍCP-400 COLOR) * 

60 ' * * 
70 :MRURICID::s;::::!* 

SO '**************************** 
90 GDT02910 

100 PM0DE4 ,1!PCLSO s SCREEN1i1 
110 LINE(0,170)-(255,174),PSET,B 
120 LINE(O j174)-(255 , 192 í,PSET,B 
F 

130 PM0DE3 j1 

140 PQKE17B,50 SPRINT(128, 2) , , 4 
150 F0RI=1T040STEP4:IK=RND(3)+1: 
COLOR K,K::LINE<I,0)-(I,170),PSE 
T:LINE(254-1,O > — í254-1,170) ,PSET 
i NEXT 

160 FQRI=2T0120STEP2:K=RND(3)+1: 
CIRCLE(OjO),I,K,-4,0,.25:CIRCLE( 
255,0)11 d' *■4, ■25i ■5:NEXT 
170 LINE(70,48)-(132,100),PSET,B 
F 

ISO PM0DE3,1 

190 DRRW"BM76,94C2U12R4F2D2G2L4R 

4F2D4BRSH2USE2R4F2D3GZL4BR14R4NE 

2L4H2U8E2R4NF2BRSD12U6R2E4NU2G4F 

4D2BR4BU6R6BD6BR6U6NR4U6R6BR6" 

200 DRRW , ’NR6D6NR4DÓR6BR6R8U6LSU6 

RBBR4R4ND12R4" 

210 F0RI=6T0120STEP16:I$=STR$(I) 
í Y$=STR$(256-1) 

220 DRRW"BM"+I$+",18SC3U4NR4U4R4 
DS" 

230 DRAW“BM"+Y$+",1BSC2NL6Ü4NL4U 
4L6R2DS" 

240 NEXTI 

250 X$=INKEY$:IFX$="fl"THEN260ELS 

EIFX$="B"THEN270ELSE250 

260 R=3:R$="C3"SGOT0280 

270 R=2:R$="C2":GGTQ2S0 

280 CLS3:PRINT9132," R> THE ROLL 

ING STDNES "; 

290 PRINT2164," B) RSIR"+STRING$ 
(15,32); 


300 PRINTS196, 
TRING$(9,32); 
310 PRINTS22S, 
NG$(12,32); 

320 PRINT2260, 
RING$(10,32); 
330 PRINT2292, 
16,32); 

340 PRINTS324, 
TRING$(9,32)S 
350 PRINT0356, 
$(14,32); 


C) QUIET RIOT"+S 

D) Z Z TÜP"+STRI 

E) ORN HRLEN"+ST 

F) YES"+STRING$( 

G) 33 SPECIAL"+5 

H) RC-DC"+STRING 


360 X$=INKEY$ í IFX$= ,< "THEN360 
370 X=RSC(X$)-64:IF X <1 THEN 360 
ELSE IF X >8 THEN360 


380 ON X GOTO 400,760,940,1170,1 

590,1330,2210,2660 

390 GDT0390 

400 PM0DE4,1:PCLS1:SCREEN1,1:PMO 
DE3,1 

410 CIRCLE(110,110),66,1,1-2,.07 
, -45 

420 CIRCLE(122,140),72,1,1.1,.5, 

■ 73 


430 CIRCLE(152,150),60,1,1-5,.53 
, -7 

440 CIRCLE(154,152),58,1,1.4,.53 
, -76 

450 DRRW 11 S4C1BM96,14SDLDLU6BM154 
,70R4E4R2F2R4F2R10E4M200,74“ 

460 F0RI=0T02:CIRCLE(238+1,150), 

72,1,1-3,-5,- 67:NEXT I 

470 DRRW"BM130,63L4HLHLHLUHUL6G2 

BD10BL6G22D2G2DGDGDLDLD2LD4L2D16 

F2R2FR2E2U2E2U16EUEUEU2EU2M106,7 

4" 

480 DRRW"BM164,S2NL4G20" 

490 CIRCLE(193,130),83,1,1.3,-57 

, .68 

500 DRRWBM11S, 13SD6F2RSE2U4E2U4 
E2U4E2U6E2U6E2U4E4" 

510 DRRW"BMS6,74H10L2H4L2U6E4R2E 
4R2E2R2E2R2E2R2E4" 

520 CIRCLEÍ134,72),44,1,1.3,-53, 
.86 

530 CIRCLE(130,20),24,1,.9,-6,-9 
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540 CIRCLE(240,0),40,1,1-1,-3,.4 
4 

550 CIRCLE(230,56),22,1,.7,.75,. 
2 

560 CIRCLE(255,152),60,1,1.5,.55 
, .72 

570 CIRCLEU70,104) ,34,1,1.4, .1, 
.25 

580 CIRCLEÍ130,60),32,1,.7,.6,.9 
590 CIRCLEí182,58),24,1,.7,.65,. 
95 

600 DRRW"BM166,4683L4H2BL50G8L2B 
2L2G2L2F8BR122BH16F2R2F2R2F2R2F2 
D2F2G4L2G2L2G2L2G6" 

610 CIRCLE(180,20),16,1,.6,.4,.1 
620 CIRCLE(134,1S),19,1,.6,.4,.1 
630 DRRW"BM124,24R4E2R2E2R4F2R2F 
2R2BR24BD2R2E2R2E2R6F2R6" 

640 CIRCLE(170,44),24,1,.9,-12,. 
4 

650 CIRCLE(132,44),25,1,.9,.12,• 

4 

660 CIRCLEÍ104,54),10,1,.9,-1,-4 

5 

670 CIRCLE(200,44),20,1,1.3,.13, 
.4 

680 PRINT(130,66),1,1 

690 PRINT(140,4),R,1 

700 PRINT(118,76),R,1 

710 PM0DE4,1:DRRW"C0BM181,152NL3 

NR3D6BRSU6F4E4D6"s PM0DE3,1 

720 DRRW“BM22,2C1R4ND8R4BR4D8U4R 

6U4ND8BR6NR6D4NR4D4R6BL80BD6" 

730 DRRW 11 ND8R6D4L6R2F4BR6U8R6D8N 
L6BR6NU8R6BR6NU8R6BR6NU8BR6U8F8N 
U8BR6U8R8ND2L8D8R8U4L4" 

740 DRRW"BD18BL66R6U4L6U4R6BR4R4 
ND8R4BR4D8R6U8NL6BR6NDSF8U8BR6NR 
6D4NR4D4R6BR6R6U4L6U4R6" 

750 X$=INKEY$:IFX$=CHR$(13)THEN 
280 ELSE 750 

~ 76 0 PM0DE4,1:PCLS1:PMÜDE4,3:PCLS 
5 1 ! SCREEN1,1s PM0DE3,1 
770 FOR 1=1 TO 255 
780 DRRW"S4C3BM30,70E48F48L16H12 
L38G12L16M24,72E54ND4F54L2UL3UDR 
3DR2L24ER2EGL2GH12NE2L34NH2G12NH 
2L24BR46NR40E12F3R11F2L14H2G7R28 

II 

790 DRRW"BF2BR10R15H8NR14H2R12H4 
4R34E4F14L22F 44NL30L2UL2UL2NL26H 
44FR2FNR2HL2HR22FR2FHL2H9NU4B2L3 
0HLRF45LHLHL14E6D4NG2U4BE10E8D4N 
65ND11U22E10F10D52H4U48NR2H6NU4G 
6NL2D38" 

800 DRRW"U22BE16E3D4NG3U4F55L22H 
12L24U2R26NG2F12NG2R13NH48RFR" 


810 P0KE178,I 

820 PRINT(46,65),,3 

830 PRINT(120,24),,3 

840 PRINT(156,24),,3 

850 PRINT(176,40),,3 

860 PRINT(83,68),,3 

870 PC0PY1T04 SPC0PY2T05 

880 Y=RND(4):IF Y=3 THEN 380 

890 PMDDE1,1:PCLS(Y) s PM0DE3,1 

900 IF Y(4 THEN 920 

910 LINE(0,0)-(256,92), PRESET ,B 

920 X*=INKEY*:IFX*=CHR*(13)THEN 

280 ELSE NEXT I 

930 G0T0760 

94 0 J=0 

950 PM0DE4,1s PCLS(J):SCREEN1,1:P 
wt ^M0DE3,l 

960 DRRW R* 

970 DRRW"S4BM20,10G8D40F8R22F8R2 
OH16U40H8NL26BLBBD14D28L10U2SR10 
BU14BR26" 

980 DRRW"D4SF8R30ESU4SL18D40L10U 
40L18BR56D56R18U56NL18BR10D56R40 
U14L20U8R20U12L20U8R20U14L40" 

990 DRRW"BR46D14R16D42R20U42R16U 
14L52" 

1000 DRRW"BD72BL156D56R1SU22F10D 
12R18U22HSE8U10H8L38R18BD14D8R8U 
8L8BU14BR3SD56R18U56NL1SBR20G8D4 
0F8R30ESU40H8L30R10BD42R10U28L10 
D28BU42" 

1010 DRRW"BR36D14R16D42R20U42R16 
U14L52" 

1020 PRINT(20,14),R,R:PRINT(70,1 
4),R,RsPRINT(130,14),R,RSPRINT(1 
52,14),R,RsPRINTÍ200,14),R,R 
1030 PRINT(40,86),R,R:PRINT(100, 
86),R,RSPRINT(140,86),R,RsPRINT( 
200,86),R,R 
1040 PM0DE4,1 

1050 F0RI=2T0200STEP4sCIRCLE(128 
,72),I,J,.9 sNEXT 

1060 PM0DE4,1s SCREEN1,1s PM0DE3,1 
1070 DRRW"BM26,170C2U13F8E8ND13B 
R8NR10DNR10D5NR8DNRSD5NR10DR10BD 
13BR6R14DL7ND12L7" 

1080 DRRW"BD12BR20U13R10DNL10D5N 
L10DNL10D6BRBNU13UNR10DR10" 

1090 DRRW"BR16U13D6NR8DR10U7D13B 
R8U13NR10DNR10D5NR8DNR8D5NR10DR1 
0" 

1100 DRRW"BR8U13NR8DNRSD5NR10DR1 
0U7D13BR8NU13UNR10DR10BR2BU13R14 
DL7ND12L7BR20UD13U7NR10DR10U7D13 

II 

1110 DRRW"BM26,152R200DL200BD22R 
200DL200" 

1120 IF J=1 THEN 1140 
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1130 FOR U=1 TO 4SPC0PY U TO U+4 
SNEXT L): J=1 JG0T0950 
1140 PM0DE4 ,1:SCREEN1,1:F0RI=1T0 
200SNEXT I 

1150 PM0DE4•5 s SCREEN1* 1:F0RI=1 T 
0200SNEXT I 

1160 X$=INKEY*:IF X*=CHR*(13) TH 
EN 280 ELSE 1140 

""T170 PM0DE4 , 1: PCLS1 s SCREEN1,1 s PM 
22- 0DE3,1 

1180 DRAW"S4C1BM0,0R100G36L22E30 
G4L50NU4R50E4L90U10R100G44R200U6 
NL166U6L160NG6E26L24" 

1190 DRRW"BR30BD8G6R10G8R10E8R8E 
6NL26BR8R28G14L28E14R10BG4R8G6L8 
E6BH4BR34R28G10L16G4L10E14BF4R8G 
2L8E2GR8" 

1200 PRINT(168,20),1,1 
1210 F0RI=0T020STEP4sLINE(128-1, 
100)-(128-1,170-1/2), PSET sLINE(1 
28+1,100)-(128+1,170-1/2),PSET:N 
EXT 

1220 CIRCLE(128,102),30,1,.3,.57 
, .92 

1230 CIRCLE(128,140),32,1,1-1,.1 
, .42 

1240 DRAW"BM102,100D56BR52U58 
1250 P0KE178,43SPRINT(128,98),,1 
1260 PM0DE3,1sF0RY=0T08BSTEPB8sF 
0RI=0T02s CIRCLE(84+Y,120),18-1,1 
,.9SNEXTI,Y 
1270 PM0DE3,1 

1280 DRRW"ClBM8S,106U22E6R66F6D2 
2BL4BU12U8H6L58G6D8E4R60F4H4L20E 
4L30G4" 

1290 CIRCLE(44,148),36,1,.9,.4,. 
9:CIRCLE(212,148),36,1,.9,.62,1. 
1 

1300 CIRCLE(60,192),54,1,.5,.67, 
.9 

1310 CIRCLE(194,192),54,1,.5,.62 
, .87 

1320 DRRW"Bti20,168F2R6BD4BR74F4R 
44E4BU4BR70R12E4" 

1330 PRINT(128,176),R,1 

1340 PRINT(128,79),R,1 

1350 PRINT(128,82),1,1 

1360 PRINT(128,190),1,1 

1370 PRINT(250,2),1,1 

1380 P0KE17S,30 s PRINT(40,8),, 1 s P 

RINT(90,30),,1 

1390 PRINT(130,18),,1s PRINT(160, 

18),,1 SPRINT(200,18),,1 

1400 P0KE17S,OsPRINT(20,4),R,1 

1410 PRINT(250,34),R,1 

1420 DRAN"BM20,126C4U90R40BR170B 

D8D80" 

1430 PM0DE4,1s F0RI=1T012 s CIRCLE( 


70,0) ,56+1,1,1.9, .25, ( (38+D/100 
)sCIRCLE(186,0),56+1,1,1.9,((50- 
(38+1))/100),.25SNEXT 
1440 F0RI=22T031STEP3sCIRCLE(44, 
148),1,0,.9,.2,•9 s CIRCLE(214,148 
),1,0,.9,.62,.353NEXTI 
1450 PM0DE4,1sSR$="C1NE20NH20NU5 
NR5NL5ND5NG20NF20" 

1460 DRRW"BM150,160"+SR$ 

1470 DRRWBM75,108"+SR$ 

1480 F0RI=1T0350 s W=RND(190)+30s U 

=RND(110)+45 s PM0DE3,1 

1490 IF PPOINT(W+l,U)=R+4 THEN 1 

510 

1500 PM0DE4,1sPSET(W,U) 

1510 NEXT Is PM0DE4,1 

1520 SR*="C1NU5ND5NL5NR5NE2NF2NG 

2NH2" 

1530 DRRW"BM110,50"+SR$ 

1540 DRRW"BM150,60"+SR$ 

1550 DRRW"BM60,70"+SR* 

1560 DRRW"BM190,65"+SR$ 

1570 DRRW"BM128,130C1NH22NE22BD1 
6NH20NE20" 

1580 X$=INKEY*:IF X*=CHR$(13) TH 
EN 280 ELSE 1580 

t T • 1590 PM0DE4,1 s PCLSO s SCREEN1,1 s PM 
^ 0DE3,1s PCLS2 

1600 DRAW"C1BM112,66M90,32M8,32M 
14,40M78,40M82,46M20,46M26,54M86 
,54M90,60M32,60M3S,68M94,68M112, 
94M150,32M104,32M110,40M128,40M1 
12,66" 

1610 DRRWBM230,60M182,60M186,54 
M236,54M242,46M190,46M194,40M248 
,40M254,32M184,32M166,60M154,60M 
166,40M172,40M177,32M158,32M116, 
100M124,110M150,68M162,6SM132,11 
8M140,128M176,68M224,68M230,60" 
1620 DRRW''BM14,40M30,46BM26,54M4 
2,60BM38,68M54,74M96,74BM112,93M 
116,96BM90,32M104,40M116,58BM150 
,32N154,35" 

1630 DRRW"BM177,32M182,36BM172,4 
0M177,44BM166,40M172,44NR4M161,6 
0BM236,54M220,60BM248,40M232,46B 
N224,68M208,74M184,74M176,68M184 
,74N150,132M140,128" 

1640 DRRW"BM124,110M130,112M154, 
74NR4M149,6SBM186,54M194,60BM194 
,40M202,46BM110,40M120,44R4” 

1650 PRINT(30,38),3,1 

1660 PRINT(220,38),3,1 

1670 PRINT(128,118),2,1 

1680 PRINT(172,50),4,1 

1690 PRINT(168,52),4,1 

1700 PRINT(2,22),4,1 

1710 FOR U=1T04 s PCOPY U TO U+4sN 
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EXT U 

1720 PM0DE3,5 

1730 PRINT(172,50),1,1 

1740 PRINT(168,52),1,1 

1750 PRINT(2,22),1,1 

1760 PM0DE3, 5 s SCREEN1, 0 s FDRI=1TÜ 

9008NEXTI 

. 1770 X*=INKEY$8lFX*=CHR*(13)THEN 
280 

1780 PM0DE4, 1 * SCREEN1,1:F0RI=1T0 
900JNEXTI 

1790 X*=INKEY*sIFX*=CHR*(13)THEN 
280 

1800 PM0DE3,5s SCREEN1,1sF0RI=1TÜ 
9008NEXTI 

1810 X*=INKEY*:IFX$=CHR*(13)THEN 
280 

^820 G0T01760 

7 % 1830 IF R=3 THEN RC=2 ELSE IF R= 
" 2 THEN RC=3 

1840 PM0DE4,1:PCLS18 SCREEN1,1 
1850 DRRW"BM86,30C0U10H10R8F6E6R 
8G10D10L8BR30U20R20D4L14D4R14D4L 
14D4R14D4NL20BR18R20U12L16U4R16U 
4L20D12R16D4L16D4" 

1860 PRINT(90,27),0,0 

1870 PRINT(120,27),0,0 

1880 PRINT(160,27),0,0 

1890 CIRCLE<123,96),60,0,.6 

1900 DRRW"BM128,96C0ND34M169,71B 

M128,96M87,71" 

1910 CIRCLE(128,96),82,0,.6,.85, 
.67 

1920 DRRW"BM128,96BH30H10L4F10BM 
128,96BE30E10R4G10" 

1930 LINE(116,144)-(140,176),PSE 
T,B 

1940 COLOR 1,0 

1950 LINE(117,143)-(139,146),PSE 
T ,BF 

1960 PRINT(140,140),0,0 

1970 LINE(126,131)-(130,188),PRE 

SET ,B 

1980 LINE(127,132)-(129,187),PSE 
T ,BF 

1990 LINE(26,95)-(68,97), PRESET , 
B 

2000 LINE(28,96)-(66,96), PSET 
2010 LINE(230,95)-(188,97),PRESE 
T,B 

2020 LINE(228,96)-(190,96),PSET 
2030 PM0DE3,1 
2040 PRINT(140,140),RC,4 
2050 PMÒDE4,1 

2060 CIRCLE(128,96),60,0,.6 
2070 PM0DE3,1 

2080 CIRCLE(128,96),60,1,.6 
2090 DRRWC1BM128,96ND34M169,71B 


M128,96M87,71" 

2100 PC0PY2T07 8 PC0PY3T08 

2110 FOR 1=1 TO 240 

2120 PC0PY7T05 s PC0PY8T06:PM0DE3, 

4 

2130 PRINT(128,92),1,1 

2140 P0KE178,I 

2150 PRINT(84,78),,1 

2160 P0KE178,1+2 

2170 PRINT(172,78),,1 

2180 PC0PY5T02 s PC0PY6T03 

2190 X*=INKEY*sIF X*=CHR*(13) TH 

EN 280 ELSE NEXT I 

22 00 G0T02110 

-^£>2210 PM0DE4,18 PCLSO s SCREEN1,1 
-02220 CIRCLE(128,96) ,94,1,.85 
2230 CIRCLEÍ128,96),90,1,.85 
2240 PRINT(128,18),1,1 
2250 DRRW"C0BM40,120NF14DNF14DNF 
14DNF14DNF14C1BU10F14U10F4D16H14 

II 

2260 PRINT(50,126),1,1 

2270 F0RI=64T0140sLINE(200,1)-(2 

30,1+12),PRESET s NEXT 

2280 LINE(10,24)-(110,80),PRESET 

»BF 

2290 PM0DE3,1s F0RI=0T03 s CIRCLE(1 
28,96-1),94+1,3,.85,.6,.67SNEXT 
2300 DRRW"C4BM50,50E16LE10D2NG10 
DNG1ODNG10DNG10U4NR8DNR8DNR8DNR8 
DR8NE8UNE8UNESBM50,50ND8L2D8BD4B 
R4E6D6LNU6LNU4LNU2D2 11 
2310 DRRW"BR8BU4E4RNG4RD3R4NE6RE 
6U3" 

2320 FQRI=1T05:PM0DE4,l:CIRCLE(1 

28.96) ,66+1,1,.85,.53,.6 8 CIRCLE( 

128.96) ,76+1,1,-85,-54,.55sNEXT 
2330 M$="R4DNL6R6DDNL4R12UR6UR4 
2340 DRRW"BM90,30"+M$+"BM90,31"+ 
M* 

2350 DRRW"BM96,40"+M*+"BM96,41"+ 
M$ 

2360 DRRW"BM110,50"+M*+"BM110,51 
"+M* 

2370 DRRW"BM114,60"+M$+"BN114,61 
"+M* 

2380 DRRW"BM112,70"+M$+"BM112,71 
"+M* 

2390 DRRW"BM106,82U4RD4RU4ED4EU4 

II 

2400 DRRW"BM72,40E2R62RE2D2" 

2410 DRRW"BM48,94NF16RNF16RNF16R 
NF16RF16NL4DNL3R4DNL5R2NU6RNU6RN 
U6" 

2420 FDRI=93T095 s CIRCLE(106,1),4 
0,1,.5,.2,.4SNEXTI 
2430 F0RI=103T0106sCIRCLE(148,1) 
,20,1,1.1,.2,.48SNEXTI 
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2440 F0RI=12ST0131:CIRCLE(170,1) 
,20,1,.4,.6,•95:NEXTI 
2450 F0RI=122TQ124:CIRCLE(199,I> 
,20,1,-4,-1,•38:NEXTI 
2460 DRRW" BM204,134NF10RNF10RNF1 
ORFlONRlOUNRlOURiONHERNHSRNHSRHS 
BL6BU4NRSUNR3UNR8URSNH5LINH5UNH5" 
2470 FDRI=92TQ94:CIRCLE(127,I),3 
0,1,-4, ■ 6,-9:ClRCLE(164,1+8),26, 

1.. 3..65..85:CIRCLE<190,1+4),28, 
1,*6,.67,*85 

2480 CIRCLE(190,1+14),30,1,*6,*7 
,.9:CIRCLE(173,1+50),30,1,1*8,.7 
5,*91CIRCLE(180,1+53),30,1,1 -S,* 
75, .9:NEXTI 

2490 DRRWBM204,11SIMR6DR6DL4R6DL 
4R6BM204,34NE5RNE5RNE5RNE5BR4BD2 
NE5RNE5RNE5RNE5BD2BL4F4R4E4DG4L4 
H4DF4R4E4" 

2500 F0RI=1T03:CIRCLE(170,72+1), 

17.1.. 6,*5,*99:CIRCLE(150,43+1), 

17.1.. 6..6.1*1:CIRCLE(177,58+1), 

17.1.. 6,*7,* 99:NEXT 
2510 PM0DE4,1 

2520 F0RY=0T0176STEP176:FGRI=OTO 
10STEP10:LINE(10+1,Y+7-I/10)-(24 
5-1, Y+7+I/10) ,PSET,BF*.NEXTI,Y 
2530 F8RI=1T02565TEP2:LINE(I,0)- 
(1,192) , PRESET :NEXT 
2540 FQRI=S4TQS7:I$=STR$(I) 

2550 DRRW 11 BM"+1$+" , 146S5U4H3U3BR 
6BDU3H2BD16BR10U4H2U4E4BR6BD6F2D 
SBU12U4E3BU2BR4F4D2G2BD2BR4G4D2B 
D4BR3ND4E7U4BR6NE3D3BRSND6BR6E4U 
2BR4BD6D4G2D4BL18BD4U6S4" 

2560 NEXTI 

2570 FÜRI=S0TD177STEP2:LINE(I,12 
3)-(I,153), PRESET: NEXT 
2580 LINEí10,96)-(28,96),F5ET:LI 
NE(20,95)-(23,97),PSET,BF 
2590 LINE(245,96)-(225,96),PSET: 
LINE(225,95)-(235,97),PSET,BF 
2600 LINE(68,18)-(185,0),PRESET, 
BF 

2610 P*MÜDE3,1 


2620 DRRW"BM74,12C4R6U4NL4Ü4NL6B 
R6D3R6U4NL6U4NL6BR14NR6D4R6D4NL6 
BR6U8R6D4L6D4BR12NR6U4NR6U4R6BR6 
NR6D3R6BR6NUSBR6U8R6D4NL6D4BR6NU 
8R6" 

2630 PNDDE4,1:FQRI=68TÜ1S4STEP2: 

LINEÍ1,0)-(I,18),PRESET:NEXT 

2640 FORI=0TG30STEP2:LINE(1,93)- 

(I,97),PRESET:LINE(1+224,93)-(!+ 

224,97),PRESET:NEXT 

2650 X*=INKEY$:IFX$=CHR$(13) THE 

N 230 ELSE 2650 

2660 PM0DE3,1 

2670 PCLS1:SCREEN1,0 

2680 FOR Y=1 TO 255 

2690 N=RND(2)+2:Q=RND(2)-1 

2700 PM0DE3,5:PCLS1 

2710 R$= ll L8Di2F4GBHSE4U36E12F12D 

36F4G8HSE4U12BÜSU10HSD1SR8" 

2720 C$="H12U36E12F12GSH6D32E6FS 
G12" 

2730 D$ = ‘ , HSE4U36H4E3R14FSD44G8L1 
4BU9BR4U42R5F4D34G4L5" 

2740 DRRW "C2" 

2750 DRRW"SSBM42,90"+R$ 

2760 DRRW"BM90,138"+C$ 

2770 DRRW"BM150,13S"+D$ 

2780 DRRWBM226,138 "+C$ 

2790 DRRW"BM136,50L10G6R4G6R4G6M 
122,70L3M130,60L3M136,50S4" 

2800 P0KE178,Y 

2310 PRINT(30,30),,2 

2320 PRINT(90,24),,2 

2S30 PRINT(120,54),,2 

2340 PRINT(150,24),,2 

2350 PRINT í 230,24),,2 

2860 FOR Ü=1 TO 4:FCOPY U+4 TO Ü 

:NEXT U 

2870 PMODE 3,1:SCREENi,Q 

2880 X$=INKEY$:IF X$=CHR*(13) TH 

EN 230 

2390 NEXT Y 

2900 G0T0266O 

2910 PCLERR3:GQT0100 


EDUCACIONAL 


RESOLUÇÃO 
DE TRIÂNGULOS 

CP 300 e CP 500 ] 


Com este programa podemos, atra¬ 
vés de três dados, encontrar os três la¬ 
dos e os três ângulos de um triângulo 
qualquer. 

Após a digitação do programa e a en¬ 
trada da instrução RUN, aparecerá uma 
indagação sobre que tipo de calculo de¬ 
ve ser executado, devendo-se responder 
R, para cálculos em radia nos, e G, pa¬ 
ra cálculos em graus. 


b 
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A seguir, aparecerão cinco opções, 
correspondentes aos tipos dc triângulos. 
Fura selecioná-las, basta digitar o nu¬ 
mere i orrespondeme. Dependendo da 


opção escolhida, diferentes informa¬ 
ções devem ser fornecidas ao com¬ 
putador. 

Depois da entrada dc dados, o com¬ 


putador apresentará, na tela, os resul¬ 
tados de cálculos obtidos. Será apresen¬ 
tado, também, o cálculo da área do 
triângulo. 


10 ' ************■#■#****■#*■#*■#■**** 

20 '* RES0LUCR0 * 

30 '* DE * 

AO '* TRIÂNGULOS * 

50 '* (CP—500 E CP—500 MSO > * 

60 MRURICIO 

70 ' ********■*■#■#**•##************ 

SO CLS: RRD=0- 0174532925: INPUT 11 0 
CRLCULG DEVERR SER FEITO.EM BR 
RUS OU RRDIRNOS (G/R) ";C$ 

90 L$=" LODO":A$=“ ANGULO":DIM X 
(5):CLS 

100 CLS:FOR M=1 TO 5:X<M)=M:NEXT 
M:PRINT X(1);L$;L$;L$:PRINT X(2 
);n$;L$;R $:print X < 3);L$;Rí;R$:p 
RINTX(4);L$;R$iL*:PRINTX(5);L$;L 

$;r$ 

110 PRINT:INPUT"QURL R OPCRO ESC 
OLHIDR (DIGITE O NUMERO)"}FsIF 
P<1 OR P >5 THEN 110 
120 ON P GOTO 140,290,360,400,44 
0 

130 STOP 

140 INPUT "LRDO JL";Sls INPUT " LRDO 
2" ;S2 

150 INPUT "LRDO 3";S3:F=0 
160 P=(S1+S2+S3)/2 
170 'R3=SQR(P*(P-S2)/(S1*S3>):S=R * 
3:GOSUB 660 

180 IF CÍ="R" THEN A2=2*W ELSE fl 
3=2*Y 

190 R2=SQR(P*(P-S1)/(S2*S3>):S=R 
2:GOSUB 660 

200 IF C$="R“ THEN R2=2*H ELSE R 
3=2*Y 

210 IF F=1 THEN 230 
220 GOSUB 250 
230 GOSUB 570 
240 GOTO 100 

250 Rl=-(COS(R3+R2)):S=Ri:GOSUB 
660 

260 IF C*="R" THEN R1=W ELSE Rl = 

Y!F=0 J RETURN 
270 RETURN 
230 STOP 

290 INPUT "RNGULD 1RI:INPUT "L 
RDÜ l";Sl:INPUT "RNGULD 3";R3 
300 IF C$="R" THEN R1=R1/RHD RND 
R3=R3/RRD 

310 P2=-(COS(A3+R1)):G=R2:GOSUB 
660 

320 IF C$="R" THEN R2= ELSE R2=Y 


330 S2=S1*SIN(A3)/SINÍR2):S3=S1* 
C0S(R3)+S2*C0S(R2) 

340 GOSUB 570 
350 GOTO100 

360 INPUT"LRDO 1"SSU INPUT "RNGU 
LO 1"; Hl :INPUT"ANGULO 2";A2 
370 IF C$="R" THEN A1=R1/RRD RND 
R2/RRD 

330 R3=-(C0S(R2+fll)):R3=S:GOSUB 
660 

390 IF C$="R" THEN R3=W ELSE R3= 
Y í GOTO 330 

400 INPUT"LRDO 1";SI:INPUT"RNGUL 
0 1";RI:INPUT"LRDO 2";S2 
410 IF C$="R" THEN Rl=fll/RRD 
420 S3=SQR<S1~2+S2~2-2*SÍ*S2*C0S 
(Rl)):F=1 
430 GOTO 160 

440 INPUT "LRDO 1SI:INPUT"LRDO 
2" ;S2:INPUT"RNGULO 2"|R2 
450 IF C$="R" THEN R2=R2/RRD 
460 A3=(S2/SI*SIN(R2)):R3=S:G0SU 
B 65<"> 

470 IF C*="R" THEN R3=W ELSE R3= 
Y:GOSUB 250 

430 S3=51*C0S(R3)+S2*C0S<R2) 

490 IF S2(=S1 THEN 340 
500 GOSUB 570 

510 R3=-(C0S(R3)):R3=S:G0SUB 660 
520 IF C$="R" THEN R3=W ELSE R3= 
Y:GOSUB 250 

530 53=S1*C0S(R3)+S2*C0S<R2) 

540 GOSUB 570 
550 GOTO 100 
560 END 
570 CLS 

530 PRINT "LRDO 1=";SI:PRINT"RNG 

ulo i=";fli 

590 PRINT"LRDÜ 2=";S2:PRINT "RNG 
ULO 2=";R2 

600 PRINT "LRDO 3="íS3:PRINT "RN 
GULO 3=";R3 

610 H=Si*S3*SIN(R3)/2:PRINT "RRE 

620’PRINT:INPUT"OUTRO CRLCULOÍ S/ 
N)";K*:IF K$="S" THEN RUN:CLS:PR 
INT"*****-***FIM DO PROGRRMR***** 

rHHHfr" 

630 END 

640 'Y=DEG W=RRD 

650 GOSUB 640:Y=90-Y:W=1.570796- 
W:RETURN 
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660 'RRCCOS SUBROTINR 

670 X=S:XF RBS(S)<=.707107 THEN 

730 

600 X=1-S A 2!IF X<0 THEN PRINT Si 
"ESTR FORR DOS PRRRMETRQS:STOP 
690 XF X=0 THEN W=90/57.29577951 
!GOTO 760 
700 W=X/2:2=0 

710 Y=(X/W-W)/2!IF (RBSÍY)(.1E-S 

JOGO 


) RND ( Y=Z) THEN X=W.*SOTO 730 
720 W=W+Y!Z=Y!GOTO 710 
730 Y=X+( X A 3 )/6+ C X^S >*. 075+ < X^7 ) 
*4.4642S6E-2 

7AO W=Y+ ( X"'9 ) *3 ■ 03S194E-2 

750 IF RBS(S)>-707107 THEN W=l-5 

70796-W 

760 Y=UI*57.29577951 sRETURN 


BOLICHE 



PARTE I 


Teste sua habilidade com este emo¬ 
cionante jogo de boliche, onde você tem 
controle total sobre o jogador, poden¬ 
do até dar efeito na bola. 

Como no jogo real, você tem duas 
chances para derrubar os dez pinos no 


final da pista. Se conseguir na primei¬ 
ra, você fará um Siri kc; na segunda, vo¬ 
cc fará um Spare. 

Para controlar o jogador e dar efei¬ 
to na bola, use o joystick direito e aper¬ 
te o botão para lançá-la. Assim que a 


bola estiver rolando pela pista, acione 
o joystick para cima ou para baixo e ela 
começará a fazer uma leve curva. Mas, 
atenção! Uma vez dado oefeito, não se 
poderá mais corrigi-lo. 

Mãos ao teclado e Strikel 


10 ' ***************************** 

20 '* 


* 

30 '* 

BOLICHE 

* 

AO '* 


* 

50 '* 

(CP-AOO COLOR > 

* 

60 '* 


* 

70 




SO '**************************** 
90 PM0DE1:PCLERR2 
100 B=1:F=1 

110 GOSUB 1060:GDSUB120:G0SUB112 
0ÍG0TCH31O 

120 DIM RI(IS), P2(14>, R3(14),R 
A CIA) ,B(14) ,C1(14) ,DÍ13) ,E(14>, 

K(10 >, Kl(10), K2C10) 

130 PM0DE1 

1A0 DRTR 160,100,172,80,172,112, 

ISA,76,ISA,100,13A,126,196,62,19 

6,06,196,112,196,136 

150 FOR V=1T010:RERD Kl(V):RERDK 

2 <V):NEXT O 

160 DRR14" BMAO, 50C3ND2R2F2G2D2R6C 
4R2C3BLSD2NF6D6" 

170 DRRWBMAO, 20C3ND2R2F2G2D2R6C 
AR2C3BLSD2ND6FAD2" 

1SO DRRW"BMAO,30C3ND2R2F2G2D2R6C 
AR2C3BLSDSR2UA" 

190 DRRW"BMAO,110C3ND2R2F2G2D2R6 
CAR2C3BL8D2FAD2BLABUAD2G2" 

200 DRRW"BM70,50C3ND2R2F2G2D2RAC 
ANF2C3BLAD2ND6FAD2" 

210 DRRW"BM100,50C3ND2R2F2G2D2R2 
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F4C4F1C3BH5L2D2F4D2BL4BU4D2G2" 
220 DRRW"BM130,50C3ND2R2F2G2G2D2 
D2BL2CAF2C3BRANH2D2BLABUAD2G2" 
230 DRRW"BM161,50C3ND2RZF2GALAC4 
BG2NG1C3BR6BU2D2FAD2BLSEAU2" 

2AO GET(36,50)-C 50,6A),RI,G:6ET( 
36,20)-(50,3A),R2,G:GET < 36,70)-< 
50,96),R3,G:GET(36,110)-(50,12A) 

, RA ,6:GET < 66,50)-(SO,6A),B,G:GET 
(96,50)-(110,6A),C1,G:GET(122,50 
>-(140,6A>,D,G:GET(152,50)-C166, 
6A),E,G 
250 RETURN 

260 2=0:PM0DE1,1:PCLS:SCREEN1,1: 
DRRW"BM6A,S0C2R190;BD32L190BR16C 
3BU7R2BUAR2BUAR2BUABLAR2BUABLAR2 
": PSET C 232,00,3): PSET (232,112,3) 
270 IFP(1)=OTHENPSET C 236,96,A) 
2S0 IF P C 2)=OTHENPSET í 2A0,92,A) 
290 IF P(3)=OTHENPSET(2A0,100,A) 
300 IFP C A)=OTHENPSET< 2AA,SS,A) 
310 IFP(5)=0THENPSET C 2AA,96,A) 
320 IFP C 6)=0THENPSET(2AA,10A,A) 
330 IFP(7)=OTHENPSET(2AS,SA,A) 

3AO IFP(0)=OTHENPSET(2AS,92,4) 
350 I FF (9)=OTHENPSET(2AS,100,A) 
360 IFP(10)=OTHENPSET(2AS,10S,A) 
370 X=16:Y=90 

3S0 PUT(X,Y)-(X+1A,Y+18),R3,PSET 
390 P5=PEEK(65200):IFP5=126 OR P 

Continua no próximo número. 
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